[Po4a-commits] po4a/lib/Locale/Po4a Sgml.pm,1.51,1.52

[Nicolas FRANCOIS]

Update of /cvsroot/po4a/po4a/lib/Locale/Po4a
In directory haydn:/tmp/cvs-serv4466/lib/Locale/Po4a

Modified Files:
	Sgml.pm 
Log Message:
Do not expand {PO4A-beg/end} only if they are at the beginning of a line.

This caused some of these {PO4A-beg/end} to be kept in the output document.


Index: Sgml.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Sgml.pm,v
retrieving revision 1.51
retrieving revision 1.52
diff -u -d -r1.51 -r1.52
--- Sgml.pm	11 May 2005 23:19:16 -0000	1.51
+++ Sgml.pm	11 May 2005 23:21:39 -0000	1.52
@@ -808,7 +808,7 @@
 	    $cdata =~ s/{PO4A-lt}/</g;
 	    $cdata =~ s/{PO4A-gt}/>/g;
 	    $cdata =~ s/{PO4A-amp}/&/g;
-	    if ($cdata =~ /^(({PO4A-(beg|end)[^\}]*})|\s)+$/ &&
+	    if ($cdata =~ /(({PO4A-(beg|end)[^\}]*})|\s)+$/ &&
 		$cdata =~ /\S/) {
 		$cdata =~ s/\s*{PO4A-end}/\]\]>\n/g;
 		$cdata =~ s/\s*{PO4A-beg-([^\}]+)}/<!\[$1\[\n/g;