Split for generation of config and auth objects #4
1 changed files with 3 additions and 3 deletions
|
@ -61,9 +61,9 @@
|
||||||
(let [resulting-config (merge config-defaults my-config)
|
(let [resulting-config (merge config-defaults my-config)
|
||||||
both (or (and only-config only-auth) (and (not only-config) (not only-auth)))
|
both (or (and only-config only-auth) (and (not only-config) (not only-auth)))
|
||||||
res-vec (cond
|
res-vec (cond
|
||||||
both (concat-vec (config-objects resulting-config) (auth-objects my-config my-auth))
|
both (concat-vec (config-objects resulting-config) (auth-objects resulting-config my-auth))
|
||||||
only-config (config-objects my-config)
|
only-config (config-objects resulting-config)
|
||||||
only-auth (auth-objects my-config my-auth))]
|
only-auth (auth-objects resulting-config my-auth))]
|
||||||
(cs/join
|
(cs/join
|
||||||
"\n---\n"
|
"\n---\n"
|
||||||
res-vec)))
|
res-vec)))
|
||||||
|
|
Loading…
Reference in a new issue