Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision eaa5b3d6

Von Moritz Bunkus vor mehr als 14 Jahren hinzugefügt

  • ID eaa5b3d60a5fe17cc1d4509c00a7772dccd70b97
  • Vorgänger 91ee6cb2
  • Nachfolger 61de23f8

Nur dann wegen fehlendem [% USE T8 %] warnen, wenn $T8 benutzt wird

Unterschiede anzeigen:

locale/de/locales.pl
567 567
      }
568 568

  
569 569
      while ($line =~ m/(?:             # Start von Variante 1: LxERP.t8('...'); ohne darumliegende [% ... %]-Tags
570
                          LxERP\.t8\(   #   LxERP.t8(
570
                          (LxERP\.t8)\( #   LxERP.t8(
571 571
                          [\'\"]        #   Anfang des zu ?bersetzenden Strings
572 572
                          (.*?)         #   Der zu ?bersetzende String
573 573
                          [\'\"]        #   Ende des zu ?bersetzenden Strings
......
579 579
                          (.*?)         #   Der zu ?bersetzende String
580 580
                          [\'\"]        #   Ende des zu ?bersetzenden Strings
581 581
                          \s*\|\s*      #   Pipe-Zeichen mit optionalen Whitespace davor und danach
582
                          \$T8          #   Filteraufruf
582
                          (\$T8)        #   Filteraufruf
583 583
                          .*?           #   Optionale Argumente f?r den Filter
584 584
                          \s*           #   Whitespaces
585 585
                          [\-~#]*       #   Whitespace-Unterdr?ckung
586 586
                          \%\]          #   Template-Ende-Tag
587 587
                        )
588 588
                       /ix) {
589
        my $string = $1 || $2;
589
        my $module = $1 || $4;
590
        my $string = $2 || $3;
590 591
        print "Found filter >>>$string<<<\n" if $debug;
591 592
        substr $line, $LAST_MATCH_START[1], $LAST_MATCH_END[0] - $LAST_MATCH_START[0], '';
592 593

  
593 594
        $cached{$_[0]}{all}{$string}    = 1;
594 595
        $cached{$_[0]}{html}{$string}   = 1;
595 596
        $cached{$_[0]}{submit}{$string} = 1 if $PREMATCH =~ /$submitsearch/;
596
        $plugins{needed}->{T8}          = 1;
597
        $plugins{needed}->{T8}          = 1 if $module eq '$T8';
597 598
      }
598 599

  
599 600
      while ("" ne $line) {

Auch abrufbar als: Unified diff