aboutsummaryrefslogtreecommitdiff
path: root/Command/Indirect.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-12-13 16:00:17 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-12-13 16:02:10 -0400
commitd6655998842b4c1dab5f1635ea081ce6739a9b3f (patch)
treec6ac9a4e02cfa629619f1c77835a0dd4cc49e551 /Command/Indirect.hs
parent7694cf98f6f3aa8010846d3a5e3140c5c44154f2 (diff)
add ok's
Diffstat (limited to 'Command/Indirect.hs')
-rw-r--r--Command/Indirect.hs6
1 files changed, 5 insertions, 1 deletions
diff --git a/Command/Indirect.hs b/Command/Indirect.hs
index d176a3e32..058a7b750 100644
--- a/Command/Indirect.hs
+++ b/Command/Indirect.hs
@@ -35,6 +35,7 @@ perform = do
showOutput
void $ inRepo $ Git.Command.runBool "commit"
[Param "-m", Param "commit before switching to indirect mode"]
+ showEndOk
-- Note that we set indirect mode early, so that we can use
-- moveAnnex in indirect mode.
@@ -77,4 +78,7 @@ perform = do
liftIO . nukeFile =<< inRepo (gitAnnexMapping k)
cleanup :: CommandCleanup
-cleanup = return True
+cleanup = do
+ showStart "indirect" ""
+ showEndOk
+ return True