Parcourir la source

allow comments in <lang>

Christoph Berg il y a 21 ans
Parent
commit
a1ffc1f826
1 fichiers modifiés avec 1 ajouts et 0 suppressions
  1. 1 0
      modules/Pisg.pm

+ 1 - 0
modules/Pisg.pm

@@ -249,6 +249,7 @@ sub get_language_templates
             $self->{tmps}->{$current_lang}{lang_charset} = lc($2);
             $self->{tmps}->{$current_lang}{lang_charset} = lc($2);
 
 
             while (<FILE>) {
             while (<FILE>) {
+                next if ($_ =~ /^#/);
                 last if ($_ =~ /<\/lang>/i);
                 last if ($_ =~ /<\/lang>/i);
 
 
                 # Get 'template = "Text"' in language file:
                 # Get 'template = "Text"' in language file: