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

uninit: Clear annex.uuid from .git/config. Closes: #670639

Browse source
This commit is contained in:
Joey Hess 2012-04-27 12:21:38 -04:00
parent a2ee4386bb
commit e0b7012ccc
3 changed files with 11 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

8
Annex/UUID.hs
View file

@ -16,12 +16,14 @@ module Annex.UUID (
getRepoUUID,
getUncachedUUID,
prepUUID,
genUUID
genUUID,
removeRepoUUID,
) where
import Common.Annex
import qualified Git
import qualified Git.Config
import qualified Git.Command
import qualified Build.SysConfig as SysConfig
import Config
@ -61,6 +63,10 @@ getRepoUUID r = do
when (g /= r) $ storeUUID cachekey u
cachekey = remoteConfig r "uuid"
removeRepoUUID :: Annex ()
removeRepoUUID = inRepo $ Git.Command.run "config"
[Param "--unset", Param configkey]
getUncachedUUID :: Git.Repo -> UUID
getUncachedUUID = toUUID . Git.Config.get configkey ""