Changeset 2432


Ignore:
Timestamp:
Oct 31, 2011, 2:06:54 AM (9 years ago)
Author:
komodo
Message:

more debug hemi

File:
1 edited

Legend:

Unmodified
Added
Removed
  • cpc/branches/senat/project/batch/hemicycle/parse_hemicycle.pl

    r2429 r2432  
    195195                        $tmpfonction = $1;
    196196                }
     197                $tmpfonction =~ s/^[,\s]+//;
    197198                if ($tmpinter ne $inter) {
    198199                        print_inter();
     
    201202                        $fonction = $tmpfonction;
    202203                }
    203         }
    204 
    205         while (s/([^>]*)<span class="info_entre_parentheses">\(?([^\)]*)\)?<\/span>([\.\s\)]*)//) {
     204                s/<span class="info_entre_parentheses">([^\(][^<]*)<\/span>/<i>\1<\/i>/g;
     205        }
     206
     207        while (s/([^>]*)<span class="info_entre_parentheses">\(([^\)]*)\)?<\/span>([\.\s\)]*)//) {
    206208                $i = $1;
    207209                $i =~ s/<[^>]*>//g;
     
    234236                s/\s+$//;
    235237                s/\.\.+//g;
     238                s/<\/sup><i>/<\/sup> <i>/gi;
    236239                if ($_) {
    237240                        if ($iscontext) {
Note: See TracChangeset for help on using the changeset viewer.