avoid showing parens for empty descriptions
This commit is contained in:
parent
48d39dd354
commit
b3e660504f
1 changed files with 1 additions and 0 deletions
|
@ -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
|
||||
|
|
Loading…
Reference in a new issue