Simplified repository description line format. The remote name, if any, is always in square brackets after the description.

1 files changed, 2 insertions, 3 deletions

diff --git a/Remote.hs b/Remote.hs
index da33e195e..06c147506 100644
--- a/Remote.hs
+++ b/Remote.hs
@@ -87,9 +87,8 @@ uuidDescriptions = M.unionWith addName <$> uuidMap <*> remoteMap name
 
 addName :: String -> RemoteName -> String
 addName desc n
-	| desc == n = desc
-	| null desc = n
-	| otherwise = n ++ " (" ++ desc ++ ")"
+	| desc == n || null desc = "[" ++ n ++ "]"
+	| otherwise = desc ++ " [" ++ n ++ "]"
 
 {- When a name is specified, looks up the remote matching that name.
  - (Or it can be a UUID.) -}