Commit 56bc71a8 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

oops #2

parent 0206c189
Loading
Loading
Loading
Loading
+1 −1
Original line number Diff line number Diff line
@@ -106,7 +106,7 @@ sub get_xml_p {
           # <Attribute [...] text="[...] "[...]"" prio="800" /> is invalid XML.
           # Work around it.
			$body
			  =~ s{<Attribute text="([^"]*)"([^"=]*)""}{<Attribute text="$1&#042;$2&#042;"}s;
			  =~ s{<Attribute([^>]+)text="([^"]*)"([^"=]*)""}{<Attribute$1text="$2&#042;$3&#042;"}s;

			my $tree;