[Po4a-commits] "po4a/lib/Locale/Po4a Xml.pm,1.63,1.64"

[Nicolas FRANCOIS]

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

Modified Files:
	Xml.pm 
Log Message:
Remove any pending space at the end of the tags. This adds support for
closing tags, with the closing '>' put on the next line.


Index: Xml.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Xml.pm,v
retrieving revision 1.63
retrieving revision 1.64
diff -u -d -r1.63 -r1.64
--- Xml.pm	2 Mar 2008 00:24:21 -0000	1.63
+++ Xml.pm	2 Mar 2008 00:26:04 -0000	1.64
@@ -851,6 +851,7 @@
 	}
 	$tag[0] =~ /^<\Q$match1\E(.*)$/s;
 	$tag[0] = $1;
+	$tag[0] =~ s/\s*$//s;
 	$tag[$#tag-1] =~ /^(.*)\Q$match2\E>$/s;
 	$tag[$#tag-1] = $1;
 	return ($eof, at tag);