summaryrefslogtreecommitdiff
path: root/Logs/Transitions.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-09-25 23:19:01 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-09-25 23:19:01 -0400
commitf32cb2cf1576db1395f77bd5f7f0c0a3e86c1334 (patch)
tree7d61d584b86f263659c96d21e5aac235f6abe239 /Logs/Transitions.hs
parent9559613df8bb914b5034ba0f1aafd26884e5d9e7 (diff)
hlint
Diffstat (limited to 'Logs/Transitions.hs')
-rw-r--r--Logs/Transitions.hs5
1 files changed, 2 insertions, 3 deletions
diff --git a/Logs/Transitions.hs b/Logs/Transitions.hs
index 783ce5090..6e5dc0dc9 100644
--- a/Logs/Transitions.hs
+++ b/Logs/Transitions.hs
@@ -82,6 +82,5 @@ transitionList = map transition . S.elems
{- Typically ran with Annex.Branch.change, but we can't import Annex.Branch
- here since it depends on this module. -}
recordTransitions :: (FilePath -> (String -> String) -> Annex ()) -> Transitions -> Annex ()
-recordTransitions changer t = do
- changer transitionsLog $
- showTransitions . S.union t . parseTransitionsStrictly "local"
+recordTransitions changer t = changer transitionsLog $
+ showTransitions . S.union t . parseTransitionsStrictly "local"