From c70280a93562e34ad3a711e23d138a96aca5ad58 Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Sun, 25 Oct 2020 16:35:43 +0100
Subject: Merge HAFAS XML fix from DBF

---
 lib/Travelynx/Helper/HAFAS.pm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/lib/Travelynx/Helper/HAFAS.pm b/lib/Travelynx/Helper/HAFAS.pm
index 5253a4e..6aefcf1 100644
--- a/lib/Travelynx/Helper/HAFAS.pm
+++ b/lib/Travelynx/Helper/HAFAS.pm
@@ -185,12 +185,17 @@ sub get_xml_p {
 				messages => [],
 			};
 
-			# <SDay text="... &gt; ..."> is invalid HTML, but present in
+			# <SDay text="... &gt; ..."> is invalid XML, but present in
 			# regardless. As it is the last tag, we just throw it away.
 			$body =~ s{<SDay [^>]*/>}{}s;
 
 			# More fixes for invalid XML
 			$body =~ s{P&R}{P&amp;R};
+
+			# <Attribute [...] text="[...] "[...]"" /> is invalid XML.
+			# Work around it.
+			$body
+			  =~ s{<Attribute([^>]+)text="([^"]*)"([^"=]*)""}{<Attribute$1text="$2&#042;$3&#042;"}s;
 			eval { $tree = XML::LibXML->load_xml( string => $body ) };
 			if ($@) {
 				$self->{log}->info("load_xml($url): $@");
-- 
cgit v1.2.3