Changeset 2461


Ignore:
Timestamp:
Nov 3, 2011, 8:11:13 PM (9 years ago)
Author:
komodo
Message:

fix numeros seances

File:
1 edited

Legend:

Unmodified
Added
Removed
  • cpc/branches/senat/project/batch/commission/parse_commission.pl

    r2460 r2461  
    138138                if ($inter =~ /<u>(Au cours[^<]*)<\/u>/) {
    139139                    $aucours = $1;
    140                     if ($aucours =~ /\Wapr[^s]+s( |-)*midi($|\W)/) {
     140                    if ($aucours =~ /\Wquatri(è|&[^;]*;)me($|\W)/) {
     141                        $nb_seance = 4;
     142                    }elsif ($aucours =~ /\W(troisi(è|&[^;]*;)me|soir(é|&[^;]*;)e)($|\W)/) {
     143                        $nb_seance = 3;
     144                    }elsif ($aucours =~ /\W(seconde|apr[^s]+s( |-)*midi)($|\W)/) {
    141145                        $nb_seance = 2;
    142                     }elsif ($aucours =~ /\Wsoir(é|&[^;]*;)e($|\W)/) {
    143                         $nb_seance = 3;
     146                    }elsif ($aucours =~ /\W(premi(è|&[^;]*;)re|matin(é|&[^;]*;)e)($|\W)/) {
     147                        $nb_seance = 1;
     148                    }else {
     149                        $nb_seance++;
    144150                    }
    145151                    print_inter() if (!$is_newcontext);
    146                     $heure = ($nb_seance == 1) ? '1ere' : $nb_seance.'ieme';
     152                    $heure = ($nb_seance == 1 ? '1ère' : $nb_seance.'ème');
    147153                    $heure .= ' séance';
    148154                    $timestamp = '0';
Note: See TracChangeset for help on using the changeset viewer.