Unneded constraint

This commit is contained in:
Gabor Greif 2016-01-27 14:44:38 +01:00 committed by Joey Hess
parent 50e4ec36c7
commit daf8aa76fe
Failed to extract signature

View file

@ -52,7 +52,7 @@ dropDead f content trustmap = case getLogVariety f of
Just OtherLog -> PreserveFile Just OtherLog -> PreserveFile
Nothing -> PreserveFile Nothing -> PreserveFile
dropDeadFromMapLog :: Ord k => TrustMap -> (k -> UUID) -> M.Map k v -> M.Map k v dropDeadFromMapLog :: TrustMap -> (k -> UUID) -> M.Map k v -> M.Map k v
dropDeadFromMapLog trustmap getuuid = M.filterWithKey $ \k _v -> notDead trustmap getuuid k dropDeadFromMapLog trustmap getuuid = M.filterWithKey $ \k _v -> notDead trustmap getuuid k
{- Presence logs can contain UUIDs or other values. Any line that matches {- Presence logs can contain UUIDs or other values. Any line that matches