fix init .git/annex/ perms for core.sharedRepository
init: Bug fix: Create .git/annex/ and .git/annex/fsckdb/ directories with permissions configured by core.sharedRepository. The fsckfb being created happens to create .git/annex/ and it was not using createAnnexDirectory. Probably a reversion partly, but maybe the database directory was always created not honoring core.sharedRepository? Sponsored-by: Noam Kremen on Patreon
This commit is contained in:
parent
7af75a59be
commit
f971b199ed
2 changed files with 4 additions and 10 deletions
|
@ -29,6 +29,8 @@ git-annex (10.20230408) UNRELEASED; urgency=medium
|
|||
--json-error-messages is enabled, output a JSON object indicating the
|
||||
problem. (But git ls-files --error-unmatch still displays errors about
|
||||
such files in some situations.)
|
||||
* init: Bug fix: Create .git/annex/ and .git/annex/fsckdb/ directories with
|
||||
permissions configured by core.sharedRepository.
|
||||
* Warn about unsupported core.sharedRepository=0xxx when set.
|
||||
|
||||
-- Joey Hess <id@joeyh.name> Sat, 08 Apr 2023 13:57:18 -0400
|
||||
|
|
|
@ -10,10 +10,8 @@
|
|||
module Database.Init where
|
||||
|
||||
import Annex.Common
|
||||
import qualified Annex
|
||||
import Annex.Perms
|
||||
import Utility.FileMode
|
||||
import Utility.Directory.Create
|
||||
import qualified Utility.RawFilePath as R
|
||||
|
||||
import Database.Persist.Sqlite
|
||||
|
@ -35,14 +33,8 @@ initDb db migration = do
|
|||
let tmpdbdir = dbdir <> ".tmp"
|
||||
let tmpdb = tmpdbdir P.</> "db"
|
||||
let tdb = T.pack (fromRawFilePath tmpdb)
|
||||
gc <- Annex.getGitConfig
|
||||
top <- parentDir <$> fromRepo gitAnnexDir
|
||||
let tops = case annexDbDir gc of
|
||||
Just topdbdir -> [top, parentDir (parentDir topdbdir)]
|
||||
Nothing -> [top]
|
||||
liftIO $ do
|
||||
createDirectoryUnder tops tmpdbdir
|
||||
runSqliteInfo (enableWAL tdb) migration
|
||||
createAnnexDirectory tmpdbdir
|
||||
liftIO $ runSqliteInfo (enableWAL tdb) migration
|
||||
setAnnexDirPerm tmpdbdir
|
||||
-- Work around sqlite bug that prevents it from honoring
|
||||
-- less restrictive umasks.
|
||||
|
|
Loading…
Reference in a new issue