summaryrefslogtreecommitdiff
path: root/Command/Sync.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-12-13 15:58:38 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-12-13 15:58:38 -0400
commit7694cf98f6f3aa8010846d3a5e3140c5c44154f2 (patch)
tree6481db2b7c8469b3a361642a35cc126aa2aaaef0 /Command/Sync.hs
parent4b9cbd2e52a1b15addf24c12eda7d43fe5b0422c (diff)
reorder for better display
Diffstat (limited to 'Command/Sync.hs')
-rw-r--r--Command/Sync.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Sync.hs b/Command/Sync.hs
index 7e3769864..7a034bfa4 100644
--- a/Command/Sync.hs
+++ b/Command/Sync.hs
@@ -80,7 +80,6 @@ syncRemotes rs = ifM (Annex.getState Annex.fast) ( nub <$> pickfast , wanted )
commit :: CommandStart
commit = next $ next $ do
- Annex.Branch.commit "update"
ifM isDirect
( ifM stageDirect
( runcommit [] , return True )
@@ -90,6 +89,7 @@ commit = next $ next $ do
runcommit ps = do
showStart "commit" ""
showOutput
+ Annex.Branch.commit "update"
-- Commit will fail when the tree is clean, so ignore failure.
_ <- inRepo $ Git.Command.runBool "commit" $ ps ++
[Param "-m", Param "git-annex automatic sync"]