diff options
author | Joey Hess <joey@kitenet.net> | 2011-10-31 16:46:51 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2011-10-31 17:22:55 -0400 |
commit | 3d2a9f84051e9dc705ba4bb4828af691e479ae0e (patch) | |
tree | f99ff17d8fa860d1dcf2c8ebd8552e1e80bda8b3 /Command/Whereis.hs | |
parent | 00988bcf369671bdc3b78e95e3c2ae43f4835b1c (diff) |
cleanup
Diffstat (limited to 'Command/Whereis.hs')
-rw-r--r-- | Command/Whereis.hs | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/Command/Whereis.hs b/Command/Whereis.hs index 7799af08c..0681bfba1 100644 --- a/Command/Whereis.hs +++ b/Command/Whereis.hs @@ -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" |