avoid showing parens for empty descriptions

This commit is contained in:
Joey Hess 2011-10-27 12:58:01 -04:00
parent 48d39dd354
commit b3e660504f

View file

@ -137,6 +137,7 @@ prettyPrintUUIDs desc uuids = do
where
addname d n
| d == n = d
| null d = n
| otherwise = n ++ " (" ++ d ++ ")"
remoteMap = M.fromList . map (\r -> (uuid r, name r)) <$> genList
findlog m u = M.findWithDefault "" u m