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

better function name

Browse source
This commit is contained in:
Joey Hess 2012-12-01 15:00:03 -04:00
parent 6d215400ef
commit 2f50af5273
2 changed files with 5 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Assistant/Threads/TransferScanner.hs
View file

@ -119,7 +119,7 @@ expensiveScan rs = unless onlyweb $ do
locs <- loggedLocations key
present <- inAnnex key
handleDrops' locs syncrs present key (Just f) Nothing
handleDropsFrom locs syncrs present key (Just f) Nothing
let slocs = S.fromList locs
let use a = return $ catMaybes $ map (a key slocs) syncrs