less space
This commit is contained in:
parent
29032cb70e
commit
1e6b7e901d
1 changed files with 1 additions and 1 deletions
|
@ -146,7 +146,7 @@ prettyPrintUUIDs desc uuids = do
|
||||||
remoteMap = M.fromList . map (\r -> (uuid r, name r)) <$> genList
|
remoteMap = M.fromList . map (\r -> (uuid r, name r)) <$> genList
|
||||||
findlog m u = M.findWithDefault "" u m
|
findlog m u = M.findWithDefault "" u m
|
||||||
prettify m here u
|
prettify m here u
|
||||||
| not (null d) = u ++ " -- " ++ d
|
| not (null d) = u ++ " -- " ++ d
|
||||||
| otherwise = u
|
| otherwise = u
|
||||||
where
|
where
|
||||||
ishere = here == u
|
ishere = here == u
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue