diff options
Diffstat (limited to 'Command/Whereis.hs')
| -rw-r--r-- | Command/Whereis.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/Command/Whereis.hs b/Command/Whereis.hs index 3a21e0a3b..bcc11aaf7 100644 --- a/Command/Whereis.hs +++ b/Command/Whereis.hs @@ -105,7 +105,6 @@ showRemoteUrls :: M.Map UUID Remote -> (UUID, [URLString]) -> Annex () showRemoteUrls remotemap (uu, us) | null us = noop | otherwise = case M.lookup uu remotemap of - Just r -> do - let ls = unlines $ map (\u -> name r ++ ": " ++ u) us - outputMessage noop ('\n' : indent ls ++ "\n") + Just r -> showLongNote $ + unlines $ map (\u -> name r ++ ": " ++ u) us Nothing -> noop |