set version before running operation that can commit

This commit is contained in:
Joey Hess 2011-03-16 16:07:33 -04:00
parent 8ad3fd2657
commit b7a49283fb

View file

@ -61,18 +61,19 @@ upgrade = do
if Git.repoIsLocalBare g
then do
moveContent
setVersion
else do
moveContent
updateSymlinks
moveLocationLogs
Annex.queueRun
setVersion
-- add new line to auto-merge hashed location logs
-- this commits, so has to come after the upgrade
liftIO $ Command.Init.gitAttributesWrite g
setVersion
return True
moveContent :: Annex ()