[Po4a-commits] "po4a/lib/Locale/Po4a Xml.pm,1.36,1.37"

[Nicolas FRANCOIS]

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

Modified Files:
	Xml.pm 
Log Message:
The type of quote must be kept. Otherwise the Xml may become invalid.


Index: Xml.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Xml.pm,v
retrieving revision 1.36
retrieving revision 1.37
diff -u -d -r1.36 -r1.37
--- Xml.pm	4 Dec 2005 18:03:16 -0000	1.36
+++ Xml.pm	4 Dec 2005 18:07:53 -0000	1.37
@@ -473,13 +473,14 @@
 			if ((not $file) and (not $includenow)) {
 			    if ($part2 =~ m/^\s*(["'])(.*)\1(\s*>.*)$/s) {
 				my $comment = "Content of the $name entity";
+				my $quote = $1;
 				my $text = $2;
 				$part2 = $3;
 				$text = $self->translate($text,
 				                         $ref,
 				                         $comment,
 				                         'wrap'=>1);
-				$t = $part1."\"$text\"$part2";
+				$t = $part1."$quote$text$quote$part2";
 			    }
 			}
 #			print $part1."\n";