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

use storeUUIDIn

Browse source
This commit is contained in:
Joey Hess 2019-10-10 12:37:47 -04:00
parent 97b499a4dc
commit 46071a2435
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
Remote/Helper/Special.hs
View file

@ -38,6 +38,7 @@ import qualified Annex
import Types.StoreRetrieve import Types.StoreRetrieve
import Types.Remote import Types.Remote
import Crypto import Crypto
import Annex.UUID
import Config import Config
import Config.Cost import Config.Cost
import Utility.Metered import Utility.Metered
@ -70,7 +71,7 @@ gitConfigSpecialRemote :: UUID -> RemoteConfig -> [(String, String)] -> Annex ()
gitConfigSpecialRemote u c cfgs = do gitConfigSpecialRemote u c cfgs = do
forM_ cfgs $ \(k, v) -> forM_ cfgs $ \(k, v) ->
setConfig (remoteConfig c k) v setConfig (remoteConfig c k) v
setConfig (remoteConfig c "uuid") (fromUUID u) storeUUIDIn (remoteConfig c "uuid") u
-- RetrievalVerifiableKeysSecure unless overridden by git config. -- RetrievalVerifiableKeysSecure unless overridden by git config.
-- --