get rid of hardcoded "name" lookups
Support "sameas-name" being set instead. In RenameRemote, rename which ever of the two is set.
This commit is contained in:
parent
92ff30df70
commit
d1130ea04a
15 changed files with 45 additions and 14 deletions
|
@ -32,6 +32,7 @@ import qualified Annex.Content
|
|||
import qualified Annex.BranchState
|
||||
import qualified Annex.Branch
|
||||
import qualified Annex.Url as Url
|
||||
import qualified Annex.SpecialRemote.Config as SpecialRemote
|
||||
import Utility.Tmp
|
||||
import Config
|
||||
import Config.Cost
|
||||
|
@ -120,7 +121,7 @@ gitSetup (Enable _) (Just u) _ c _ = do
|
|||
inRepo $ Git.Command.run
|
||||
[ Param "remote"
|
||||
, Param "add"
|
||||
, Param $ fromMaybe (giveup "no name") (M.lookup "name" c)
|
||||
, Param $ fromMaybe (giveup "no name") (SpecialRemote.lookupName c)
|
||||
, Param $ fromMaybe (giveup "no location") (M.lookup "location" c)
|
||||
]
|
||||
return (c, u)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue