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

cleanup

Browse source
This commit is contained in:
Joey Hess 2011-10-31 16:46:51 -04:00
parent 00988bcf36
commit 3d2a9f8405
11 changed files with 48 additions and 54 deletions
Download patch file Download diff file Expand all files Collapse all files

6
Command/Whereis.hs
View file

@ -31,11 +31,9 @@ perform key = do
let num = length safelocations
showNote $ show num ++ " " ++ copiesplural num
pp <- prettyPrintUUIDs "whereis" safelocations
unless (null safelocations) $
showLongNote pp
unless (null safelocations) $ showLongNote pp
pp' <- prettyPrintUUIDs "untrusted" untrustedlocations
unless (null untrustedlocations) $
showLongNote $ untrustedheader ++ pp'
unless (null untrustedlocations) $ showLongNote $ untrustedheader ++ pp'
if null safelocations then stop else next $ return True
where
copiesplural 1 = "copy"