From 85e78e454171812d8c8315c7d20d472b1d5ab946 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 18 May 2016 12:26:38 -0400 Subject: nub transitionList to avoid ugly message after repeated transitions, and avoid redundant work for repeated ForgetDeadRemotes transitions --- Logs/Transitions.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Logs') diff --git a/Logs/Transitions.hs b/Logs/Transitions.hs index eb9fb433b..544004768 100644 --- a/Logs/Transitions.hs +++ b/Logs/Transitions.hs @@ -77,7 +77,7 @@ combineTransitions :: [Transitions] -> Transitions combineTransitions = S.unions transitionList :: Transitions -> [Transition] -transitionList = map transition . S.elems +transitionList = nub . map transition . S.elems {- Typically ran with Annex.Branch.change, but we can't import Annex.Branch - here since it depends on this module. -} -- cgit v1.2.3