diff options
Diffstat (limited to 'Command/ImportFeed.hs')
| -rw-r--r-- | Command/ImportFeed.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Command/ImportFeed.hs b/Command/ImportFeed.hs index 816865e8c..e455ebb63 100644 --- a/Command/ImportFeed.hs +++ b/Command/ImportFeed.hs @@ -52,7 +52,9 @@ perform relaxed cache url = do Just l | not (null l) -> do ok <- all id <$> mapM (downloadEnclosure relaxed cache) l - next $ cleanup url ok + unless ok $ + feedProblem url "problem downloading item" + next $ cleanup url True _ -> do feedProblem url "bad feed content" next $ return True |