diff options
author | Joey Hess <joey@kitenet.net> | 2010-10-15 19:32:56 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2010-10-15 19:32:56 -0400 |
commit | e67887d98b61aeabffc9d1a231421bb00848dd13 (patch) | |
tree | d7a46b9463ecab37e0ba1fec2979f5e86305133e /UUID.hs | |
parent | 946a7f3f2128704c7b4eeea265a1375c1b60c622 (diff) |
lift to IO
Diffstat (limited to 'UUID.hs')
-rw-r--r-- | UUID.hs | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -91,7 +91,7 @@ reposByUUID repos uuids = do {- Pretty-prints a list of UUIDs - TODO: use lookup file to really show pretty names. -} -prettyPrintUUIDs :: [UUID] -> String +prettyPrintUUIDs :: [UUID] -> Annex String prettyPrintUUIDs uuids = - unwords $ map (\u -> "\tUUID "++u++"\n") uuids + return $ unwords $ map (\u -> "\tUUID "++u++"\n") uuids |