luciano/babashka
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Remove debugging printlns from main/exec

Browse source
This commit is contained in:
Wes Morgan 2022-10-10 11:54:24 -06:00
parent f24eb5142d
commit 4d1f59ce22
No known key found for this signature in database
GPG key ID: 5639E4CBFA17DC84
1 changed files with 0 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/babashka/main.clj
View file

@ -806,14 +806,11 @@ Use bb run --help to show this help output.
(defn build-load-fn
[]
(fn [{:keys [:namespace :reload]}]
(println "load-fn called")
(let [{:keys [loader]} @cp/cp-state]
(println "load-fn found loader?" (boolean loader))
(or
;; pod namespaces go before namespaces from source,
;; unless reload is used
(when-not reload
(println "load-fn looking for namespace" namespace "in pod-namespaces")
(when-let [pod (get @pod-namespaces namespace)]
(pods/load-pod (:pod-spec pod) (:opts pod))
{}))
@ -823,11 +820,9 @@ Use bb run --help to show this help output.
nil)
(when loader
(when-let [{:keys [:file :source] :as res} (cp/source-for-namespace loader namespace nil)]
(println "load-fn source-for-namespace res:" (pr-str res))
(if (str/ends-with? file "/pod-manifest.edn")
(let [manifest (edn/read-string source)]
(when-let [pod-nses (pods/load-pod-metadata-from-manifest manifest)]
(println "load-fn got pod namespaces:" (pr-str pod-nses))
;; TODO: Make the pod loading code look for the manifest in the lib instead?
(spit (pods/pod-manifest-file manifest) source)
(vswap! pod-namespaces merge pod-nses)