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

save state before message

Browse source 
to avoid long delay after
This commit is contained in:
Joey Hess 2011-06-24 02:33:44 -04:00
parent 49d77156ac
commit 50354a4916
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
Upgrade/V2.hs
View file

@ -22,6 +22,7 @@ import qualified Branch
import Messages import Messages
import Utility import Utility
import Locations import Locations
import Content
olddir :: Git.Repo -> FilePath olddir :: Git.Repo -> FilePath
olddir g olddir g
@ -56,6 +57,8 @@ upgrade = do
Git.run g "rm" [Param "-r", Param "-f", Param "-q", File (olddir g)] Git.run g "rm" [Param "-r", Param "-f", Param "-q", File (olddir g)]
unless bare $ gitAttributesUnWrite g unless bare $ gitAttributesUnWrite g
saveState
unless bare $ do unless bare $ do
showLongNote $ showLongNote $
"git-annex branch created\n" ++ "git-annex branch created\n" ++