Swap deployments main executing method syntax and cleaned up extended-exports

This commit is contained in:
2025-09-20 03:09:18 -05:00
parent 50448db409
commit e7f8fac0ac

View File

@@ -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))))))