X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FTSN%2FXML%2FNews.hs;h=49ff8b7d655ff1c41cc2ef1423b79948e4b8731c;hb=2069d0a786bf2c418f27574f5384eae39527d03f;hp=a2421e9921d32af8947b6993d63315a2b9e4e3b5;hpb=2f0d419104ac1ad108ae1b29d6722ed032286665;p=dead%2Fhtsn-import.git

diff --git a/src/TSN/XML/News.hs b/src/TSN/XML/News.hs
index a2421e9..49ff8b7 100644
--- a/src/TSN/XML/News.hs
+++ b/src/TSN/XML/News.hs
@@ -39,6 +39,7 @@ import Text.XML.HXT.Core (
   xpOption,
   xpPair,
   xpText,
+  xpText0,
   xpTriple,
   xpWrap )
 
@@ -270,7 +271,7 @@ pickle_message =
               pickle_msg_id
               (xpElem "category" xpText)
               (xpElem "sport" xpText)
-              (xpElem "url" xpText)
+              (xpElem "url" xpText0)
               (xpList pickle_news_team)
               (xpList pickle_location)
               (xpElem "SMS" xpText)