From 1e6b7e901d47142a99ab4e6608f6307c01bc085e Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 30 Sep 2011 16:21:28 -0400 Subject: [PATCH] less space --- Remote.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Remote.hs b/Remote.hs index 83a593dd50..efa7a5cc8e 100644 --- a/Remote.hs +++ b/Remote.hs @@ -146,7 +146,7 @@ prettyPrintUUIDs desc uuids = do remoteMap = M.fromList . map (\r -> (uuid r, name r)) <$> genList findlog m u = M.findWithDefault "" u m prettify m here u - | not (null d) = u ++ " -- " ++ d + | not (null d) = u ++ " -- " ++ d | otherwise = u where ishere = here == u