addcomputed inherits extra initremote parameters
This is limited because the remote config is a field/value map. So order is not preserved, and when 2 parameters have the same field name, only the last one will be passed.
This commit is contained in:
parent
a5b53fa98a
commit
eed522a0f8
4 changed files with 21 additions and 12 deletions
|
@ -88,8 +88,8 @@ perform o r program = do
|
|||
repopath <- fromRepo Git.repoPath
|
||||
subdir <- liftIO $ relPathDirToFile repopath (literalOsPath ".")
|
||||
let state = Remote.Compute.ComputeState
|
||||
-- TODO add inherited initremote parameters
|
||||
{ Remote.Compute.computeParams = computeParams o
|
||||
{ Remote.Compute.computeParams = computeParams o ++
|
||||
Remote.Compute.defaultComputeParams r
|
||||
, Remote.Compute.computeInputs = mempty
|
||||
, Remote.Compute.computeOutputs = mempty
|
||||
, Remote.Compute.computeSubdir = subdir
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue