Repository tuning parameters can now be passed when initializing a repository for the first time.
* init: Repository tuning parameters can now be passed when initializing a repository for the first time. For details, see http://git-annex.branchable.com/tuning/ * merge: Refuse to merge changes from a git-annex branch of a repo that has been tuned in incompatable ways.
This commit is contained in:
parent
b11a7b0ace
commit
70736d2b41
25 changed files with 376 additions and 25 deletions
|
@ -20,6 +20,7 @@ import Config.Cost
|
|||
import Types.Distribution
|
||||
import Types.Availability
|
||||
import Types.NumCopies
|
||||
import Types.Difference
|
||||
import Utility.HumanTime
|
||||
|
||||
{- Main git-annex settings. Each setting corresponds to a git-config key
|
||||
|
@ -56,6 +57,7 @@ data GitConfig = GitConfig
|
|||
, annexHardLink :: Bool
|
||||
, coreSymlinks :: Bool
|
||||
, gcryptId :: Maybe String
|
||||
, annexDifferences :: Differences
|
||||
}
|
||||
|
||||
extractGitConfig :: Git.Repo -> GitConfig
|
||||
|
@ -93,6 +95,7 @@ extractGitConfig r = GitConfig
|
|||
, annexHardLink = getbool (annex "hardlink") False
|
||||
, coreSymlinks = getbool "core.symlinks" True
|
||||
, gcryptId = getmaybe "core.gcrypt-id"
|
||||
, annexDifferences = getDifferences r
|
||||
}
|
||||
where
|
||||
getbool k def = fromMaybe def $ getmaybebool k
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue