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

avoid switching to direct mode in clone of adjusted branch repo

Browse source
This commit is contained in:
Joey Hess 2016-06-02 15:36:52 -04:00
parent 72f0d3d384
commit 69bf128f76
Failed to extract signature
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
Annex/Init.hs
View file

@ -93,6 +93,8 @@ initialize' mversion = do
whenM versionSupportsUnlockedPointers $ do whenM versionSupportsUnlockedPointers $ do
configureSmudgeFilter configureSmudgeFilter
Database.Keys.scanAssociatedFiles Database.Keys.scanAssociatedFiles
whenM checkAdjustedClone $
void $ upgrade True
ifM (crippledFileSystem <&&> (not <$> isBare)) ifM (crippledFileSystem <&&> (not <$> isBare))
( ifM versionSupportsUnlockedPointers ( ifM versionSupportsUnlockedPointers
( adjustToCrippledFileSystem ( adjustToCrippledFileSystem
@ -105,8 +107,6 @@ initialize' mversion = do
, unlessM isBare , unlessM isBare
switchHEADBack switchHEADBack
) )
whenM checkAdjustedClone $
void $ upgrade True
createInodeSentinalFile False createInodeSentinalFile False
uninitialize :: Annex () uninitialize :: Annex ()