Ignore:
Timestamp:
Feb 5, 2012, 2:45:50 PM (9 years ago)
Author:
goya
Message:

fix bugs amdmts

File:
1 edited

Legend:

Unmodified
Added
Removed
  • cpc/trunk/project/batch/amendements/cut_amdmt.pl

    r2608 r2633  
    33$file = shift;
    44use HTML::TokeParser;
     5require ("../common/common.pm");
    56
    67my %amdmt;
     
    190191            numero();
    191192        }
    192     } elsif ($line =~ /date_amend.(\d{1,2}) avril (\d{4})\D/i && !$amdmt{'date'}) {
    193            $amdmt{'date'} = $2.'-04-'.sprintf('%02d', $1);
     193    } elsif ($line =~ /date_?amend.*([0-9]+e?r? \S+ [0-9]+)\D/i && !$amdmt{'date'}) {
     194           $amdmt{'date'} = join '/', reverse datize($1);
    194195    } elsif ($line =~ /class="amddispotitre"/i && !$amdmt{'sujet'}) {
    195196            $line =~ s/<[^>]+>//g;
     
    276277            texte();
    277278        }
    278     } elsif ($presente == 1 && $line =~ /<(p style=".*text-indent:.*|td align="center"[^>]*)>.*M[\.Mml]/i) {
     279    } elsif ($presente == 1 && $line =~ /<(p style=".*text-indent:.*|td align="center"[^>]*)>.*(M[\.Mml]|Le gouvern)/i) {
    279280        auteurs();
    280281    } elsif ($line =~ /\<p style=".*text-indent:/i) {
Note: See TracChangeset for help on using the changeset viewer.