[Po4a-commits] "po4a/lib/Locale/Po4a Sgml.pm,1.82,1.83"

[Nicolas FRANCOIS]

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

Modified Files:
	Sgml.pm 
Log Message:
Do not re-wrap the prolog entities on one line.
More info at:
http://lists.alioth.debian.org/pipermail/po4a-devel/2005-November/001083.html
Thanks to Thomas Huriaux for reporting the issue.


Index: Sgml.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Sgml.pm,v
retrieving revision 1.82
retrieving revision 1.83
diff -u -d -r1.82 -r1.83
--- Sgml.pm	30 Oct 2005 16:42:11 -0000	1.82
+++ Sgml.pm	15 Nov 2005 16:10:39 -0000	1.83
@@ -541,11 +541,10 @@
 	    local $/ = undef;
 	    $prologentincl{$key} = <IN>;
 	    close IN;
-	    my @lines = split(/\n/,$prologentincl{$key});
-	    print STDERR "Content of \%$key; is $filename (".(scalar @lines)." lines long)\n"
+	    print STDERR "Content of \%$key; is $filename (".
+	                 ($prologentincl{$key} =~ tr/\n/\n/).
+	                 " lines long)\n"
 	      if ($debug{'entities'});
-	    # leave those damn references in peace by making sure it fits on one line
-	    $prologentincl{$key} = join (" ", @lines);
 	    print STDERR "content: ".$prologentincl{$key}."\n"
 	      if ($debug{'entities'});
 	    $moretodo = 1;