diff options
| author |  Gabor Greif <ggreif@gmail.com> | 2016-01-27 14:44:38 +0100 |
|---|---|---|
| committer |  Joey Hess <joeyh@joeyh.name> | 2016-01-28 12:34:07 -0400 |
| commit | bdb9d2a209fbada91a53938c8cf8ad666d6df832 (patch) | |
| tree | 9c740027c5bd849e2be851f4a24d596326aec10b /Annex/Branch | |
| parent | 89c0f7f72e16ef5ee0ce55df3ccfefa0f7f8f970 (diff) | |
Unneded constraint
Diffstat (limited to 'Annex/Branch')
| -rw-r--r-- | Annex/Branch/Transitions.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Annex/Branch/Transitions.hs b/Annex/Branch/Transitions.hs index a9c7daa20..7b1f32b31 100644 --- a/Annex/Branch/Transitions.hs +++ b/Annex/Branch/Transitions.hs @@ -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 |