Fix with-profile task to work from the base project rather than being additive.
This commit is contained in:
parent
f6e5959e7c
commit
2348b6b619
2 changed files with 2 additions and 2 deletions
|
@ -310,7 +310,7 @@
|
|||
(ssl/register-scheme (ssl/https-scheme context))
|
||||
project))
|
||||
|
||||
(defn- reset-profiles
|
||||
(defn reset-profiles
|
||||
"Compute a fresh version of the project map with middleware applied, including
|
||||
and excluding the specified profiles."
|
||||
[project include-profiles & [exclude-profiles]]
|
||||
|
|
|
@ -6,7 +6,7 @@
|
|||
"Apply the given task with a comma-separated profile list."
|
||||
[project profiles task-name & args]
|
||||
(let [profiles (map keyword (.split profiles ","))
|
||||
project (and project (project/merge-profiles project profiles))
|
||||
project (and project (project/reset-profiles project profiles))
|
||||
task-name (main/lookup-alias task-name project)]
|
||||
(main/apply-task task-name project args)))
|
||||
|
||||
|
|
Loading…
Reference in a new issue