uninit: Fix a small bug that left a lock file in .git/annex

unannex using git queue caused the queue lock to be taken after uninit had
cleaned out .git/annex. Flush the queue earlier to avoid.
This commit is contained in:
Joey Hess 2021-03-01 13:05:47 -04:00
parent 9835fa5d01
commit a8b627d82b
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
2 changed files with 3 additions and 0 deletions

View file

@ -1,6 +1,7 @@
git-annex (8.20210224) UNRELEASED; urgency=medium
* Windows: Correct the path to the html help file for 64 bit build.
* uninit: Fix a small bug that left a lock file in .git/annex
-- Joey Hess <id@joeyh.name> Wed, 24 Feb 2021 13:18:38 -0400

View file

@ -13,6 +13,7 @@ import qualified Git
import qualified Git.Command
import qualified Command.Unannex
import qualified Annex.Branch
import qualified Annex.Queue
import qualified Database.Keys
import Annex.Content
import Annex.Init
@ -65,6 +66,7 @@ startCheckIncomplete file _ = giveup $ unlines
finish :: Annex ()
finish = do
Annex.Queue.flush
annexdir <- fromRawFilePath <$> fromRepo gitAnnexDir
annexobjectdir <- fromRepo gitAnnexObjectDir
leftovers <- removeUnannexed =<< listKeys InAnnex