From e7f8fac0ac7ab4771e8d77811cab28d54f56d2f7 Mon Sep 17 00:00:00 2001 From: GigiaJ Date: Sat, 20 Sep 2025 03:09:18 -0500 Subject: [PATCH] Swap deployments main executing method syntax and cleaned up extended-exports --- iac/src/main/deployments.cljs | 14 +++++++++++--- 1 file changed, 11 insertions(+), 3 deletions(-) diff --git a/iac/src/main/deployments.cljs b/iac/src/main/deployments.cljs index f45bcfe..7cca1cc 100644 --- a/iac/src/main/deployments.cljs +++ b/iac/src/main/deployments.cljs @@ -9,10 +9,18 @@ (let [nextcloud-result (nextcloud/deploy-nextcloud provider vault-params)] {:nextcloud nextcloud-result})) -(defn extended-exports [app-outputs exports] - (assoc exports :nextcloudUrl (.apply app-outputs #(get-in % [:nextcloud :nextcloud-url])))) +(defn extended-exports [init] + (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)] (set! (.-exports js/module) (clj->js (extended-exports (get init :setup) (base.build-exports init))))))