mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

hlint

Browse source 
test suite still passes
This commit is contained in:
Joey Hess 2013-09-25 03:09:06 -04:00
parent 3192b059b5
commit b405295aee
30 changed files with 72 additions and 75 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Command/ImportFeed.hs
View file

@ -50,8 +50,7 @@ perform relaxed cache url = do
v <- findEnclosures url
case v of
Just l | not (null l) -> do
ok <- all id
<$> mapM (downloadEnclosure relaxed cache) l
ok <- and <$> mapM (downloadEnclosure relaxed cache) l
unless ok $
feedProblem url "problem downloading item"
next $ cleanup url True