[Po4a-commits] "po4a/lib/Locale/Po4a TeX.pm,1.99,1.100"

[Nicolas FRANCOIS]

Update of /cvsroot/po4a/po4a/lib/Locale/Po4a
In directory alioth:/tmp/cvs-serv20955/lib/Locale/Po4a

Modified Files:
	TeX.pm 
Log Message:
	* NEWS, lib/Locale/Po4a/TeX.pm: Fix support for inline
	customization of separators. The [#x]Â modifier is optional.


Index: TeX.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/TeX.pm,v
retrieving revision 1.99
retrieving revision 1.100
diff -u -d -r1.99 -r1.100
--- TeX.pm	28 Feb 2009 21:35:42 -0000	1.99
+++ TeX.pm	16 Mar 2009 20:30:11 -0000	1.100
@@ -1079,9 +1079,9 @@
         if ($line =~ m/^\s*((?:\{_?\}|\[_?\])*)\s*$/) {
             register_generic_environment("$env,$1");
         }
-    } elsif ($line =~ /^separator\s+(\w+(?:\[#[0-9]+\]))\s+\"(.*)\"\s*$/) {
+    } elsif ($line =~ /^separator\s+(\w+(?:\[#[0-9]+\])?)\s+\"(.*)\"\s*$/) {
         my $env = $1; # This is not necessarily an environment.
-                      # It can also be smth like 'title{#1}'.
+                      # It can also be smth like 'title[#1]'.
         $env_separators{$env} = $2;
     } elsif ($line =~ /^verbatim\s+environment\s+(\w+)\s+$/) {
         register_verbatim_environment($1);