Shared.fetchItem: unescape URI encoding before reading local file.
Close #1427.
This commit is contained in:
parent
5883899625
commit
b80577b395
1 changed files with 1 additions and 1 deletions
|
@ -772,7 +772,7 @@ fetchItem sourceURL s
|
|||
let mime = case takeExtension s of
|
||||
".gz" -> getMimeType $ dropExtension s
|
||||
x -> getMimeType x
|
||||
cont <- BS.readFile s
|
||||
cont <- BS.readFile $ unEscapeString s
|
||||
return (cont, mime)
|
||||
|
||||
-- | Read from a URL and return raw data and maybe mime type.
|
||||
|
|
Loading…
Reference in a new issue