feat: navbar

src/net/deertopia/doerg/config.clj

@@ -66,9 +66,6 @@
       (throw (ex-info "Failed to conform config"
                       (s/explain-data ::config r))))))
 
-(defn load-config! [var spec files & {:as opts}]
-  (alter-var-root var (constantly (read-config files opts))))
-
 (def sources
   [;; Default config.
    (io/resource "net/deertopia/doerg/default-config.edn")
@@ -80,3 +77,10 @@
 (def default (read-config sources))
 
 (def ^:dynamic *cfg* default)
+
+(defn load-config!
+  ([& {:as opts :keys [files]
+       :or {files sources}}]
+   (let [passthru-opts (-> opts (dissoc :files))]
+     (alter-var-root
+      #'*cfg* (constantly (read-config files passthru-opts))))))