Unneded constraint
This commit is contained in:
parent
50e4ec36c7
commit
daf8aa76fe
1 changed files with 1 additions and 1 deletions
|
@ -52,7 +52,7 @@ dropDead f content trustmap = case getLogVariety f of
|
|||
Just OtherLog -> 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
|
||||
|
||||
{- Presence logs can contain UUIDs or other values. Any line that matches
|
||||
|
|
Loading…
Reference in a new issue