importfeed: Fix feed download when curl is used.
This bug used to only afflict file:/// urls, but became more exposed
by b8f0b7309f
.
This commit is contained in:
parent
c65e71e6a5
commit
aa31af5594
2 changed files with 3 additions and 2 deletions
|
@ -150,9 +150,9 @@ downloadFeed url = do
|
|||
showOutput
|
||||
uo <- Url.getUrlOptions
|
||||
liftIO $ withTmpFile "feed" $ \f h -> do
|
||||
fileEncoding h
|
||||
hClose h
|
||||
ifM (Url.download url f uo)
|
||||
( parseFeedString <$> hGetContentsStrict h
|
||||
( parseFeedString <$> readFileStrictAnyEncoding f
|
||||
, return Nothing
|
||||
)
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue