Changeset 2431


Ignore:
Timestamp:
Oct 31, 2011, 1:49:10 AM (9 years ago)
Author:
komodo
Message:

first debug commissions

File:
1 edited

Legend:

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

    r2426 r2431  
    9090
    9191foreach (split /\n/, $content) {
     92        s/&(nbsp|#160);/ /ig;
     93        s/ n<sup>[0os\s]+<\/sup>\s*/ n° /ig;
    9294        $begin = 1 if (/name="toc1"/);
    9395#print STDERR "title: $1\n" if (/<title>([^<]*)</);
     
    120122                setfonction($titre);
    121123                $context =~ s/&nbsp;/ /g;
    122                 $context =~ s/ - / > /;
     124                $context =~ s/ -{1,2} / > /;
    123125                $intervention = '<p>'.$titre.'</p>';
    124126                %fonctions = ();
Note: See TracChangeset for help on using the changeset viewer.