@@ -772,7 +772,7 @@ fetchItem sourceURL s
772 let mime = case takeExtension s of
772 let mime = case takeExtension s of
773 ".gz" -> getMimeType $ dropExtension s
773 ".gz" -> getMimeType $ dropExtension s
774 x -> getMimeType x
774 x -> getMimeType x
775− cont <- BS.readFile s
775+ cont <- BS.readFile $ unEscapeString s
776 return (cont, mime)
776 return (cont, mime)
778-- | Read from a URL and return raw data and maybe mime type.
778-- | Read from a URL and return raw data and maybe mime type.