[Po4a-commits] po4a/lib/Locale/Po4a Xml.pm,1.25,1.26

[Jordi Vilalta]

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

Modified Files:
	Xml.pm 
Log Message:
Handle the processing instructions ( <?...?> ) simply ignoring them


Index: Xml.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Xml.pm,v
retrieving revision 1.25
retrieving revision 1.26
diff -u -d -r1.25 -r1.26
--- Xml.pm	15 Feb 2005 15:47:34 -0000	1.25
+++ Xml.pm	21 Mar 2005 12:58:24 -0000	1.26
@@ -355,10 +355,10 @@
 		end		=> "?",
 		breaking	=> 1,
 		f_translate	=> \&tag_trans_xmlhead},
-#	{	beginning	=> "?",
-#		end		=> "?",
-#		breaking	=> 1,
-#		f_translate	=> \&tag_trans_procins},
+	{	beginning	=> "?",
+		end		=> "?",
+		breaking	=> 1,
+		f_translate	=> \&tag_trans_procins},
 	{	beginning	=> "!DOCTYPE",
 		end		=> "",
 		breaking	=> 1,
@@ -402,6 +402,11 @@
 	$tag =~ s/$in_charset/$out_charset/;
 
 	return $tag;
+}
+
+sub tag_trans_procins {
+	my ($self,@tag)=@_;
+	return $self->join_lines(@tag);
 }
 
 sub tag_extract_doctype {