mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

commit changes to git-annex branch on shutdown

Browse source
This commit is contained in:
Joey Hess 2011-06-22 16:00:04 -04:00
parent 8166facaef
commit 17a09fccad
1 changed files with 2 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
CmdLine.hs
View file

@ -19,6 +19,7 @@ import Control.Monad (when)
import qualified Annex import qualified Annex
import qualified AnnexQueue import qualified AnnexQueue
import qualified GitRepo as Git import qualified GitRepo as Git
import qualified Branch
import Types import Types
import Command import Command
import BackendList import BackendList
@ -102,6 +103,7 @@ startup = do
{- Cleanup actions. -} {- Cleanup actions. -}
shutdown :: Annex Bool shutdown :: Annex Bool
shutdown = do shutdown = do
Branch.commit "update"
AnnexQueue.flush False AnnexQueue.flush False
liftIO $ Git.reap liftIO $ Git.reap