Swap deployments main executing method syntax and cleaned up extended-exports
This commit is contained in:
@@ -9,10 +9,18 @@
|
|||||||
(let [nextcloud-result (nextcloud/deploy-nextcloud provider vault-params)]
|
(let [nextcloud-result (nextcloud/deploy-nextcloud provider vault-params)]
|
||||||
{:nextcloud nextcloud-result}))
|
{:nextcloud nextcloud-result}))
|
||||||
|
|
||||||
(defn extended-exports [app-outputs exports]
|
(defn extended-exports [init]
|
||||||
(assoc exports :nextcloudUrl (.apply app-outputs #(get-in % [:nextcloud :nextcloud-url]))))
|
(let [exports (base.build-exports init)
|
||||||
|
app-outputs (get init :setup)]
|
||||||
|
(assoc exports :nextcloudUrl (.apply app-outputs #(get-in % [:nextcloud :nextcloud-url])))))
|
||||||
|
|
||||||
(defn deploy-services []
|
(defn quick-deploy []
|
||||||
|
(->
|
||||||
|
(base/initialize app-list)
|
||||||
|
(extended-exports)
|
||||||
|
(clj->js)))
|
||||||
|
|
||||||
|
#_(defn deploy-services []
|
||||||
(let [init (base/initialize app-list)]
|
(let [init (base/initialize app-list)]
|
||||||
(set! (.-exports js/module)
|
(set! (.-exports js/module)
|
||||||
(clj->js (extended-exports (get init :setup) (base.build-exports init))))))
|
(clj->js (extended-exports (get init :setup) (base.build-exports init))))))
|
||||||
|
|||||||
Reference in New Issue
Block a user