diff options
author | Joey Hess <joey@kitenet.net> | 2014-02-11 01:35:11 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2014-02-11 10:48:52 -0400 |
commit | f4dee5a48229d6e17c87b7346509bf37811367d5 (patch) | |
tree | 44ec976fed590223c00cf0725bb5d5e28305e592 /Remote.hs | |
parent | 82feaf7305d2e40155ffd8e80c5f3bf6c9a71bd6 (diff) |
more hlint
Diffstat (limited to 'Remote.hs')
-rw-r--r-- | Remote.hs | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -189,8 +189,7 @@ prettyUUID u = concat <$> prettyListUUIDs [u] remoteFromUUID :: UUID -> Annex (Maybe Remote) remoteFromUUID u = ifM ((==) u <$> getUUID) ( return Nothing - , do - maybe tryharder (return . Just) =<< findinmap + , maybe tryharder (return . Just) =<< findinmap ) where findinmap = M.lookup u <$> remoteMap id |