diff --git a/publisher/resources/net/deertopia/publisher/default-config.edn b/publisher/resources/net/deertopia/publisher/default-config.edn index d467e9c..52b0b3a 100644 --- a/publisher/resources/net/deertopia/publisher/default-config.edn +++ b/publisher/resources/net/deertopia/publisher/default-config.edn @@ -2,4 +2,5 @@ {:state-directory #join [#or [#env XDG_STATE_HOME #envf ["%s/.local/share" HOME]] "/doerg-publisher"] - :org-roam-db-path #join [#env HOME "/.cache/emacs/org-roam.db"]} + :org-roam-db-path #join [#env HOME "/.cache/emacs/org-roam.db"] + :port 8080} diff --git a/publisher/src/net/deertopia/publisher/server.clj b/publisher/src/net/deertopia/publisher/server.clj index 20c600d..78330d2 100644 --- a/publisher/src/net/deertopia/publisher/server.clj +++ b/publisher/src/net/deertopia/publisher/server.clj @@ -3,6 +3,7 @@ [clojure.tools.logging :as l] [hiccup2.core :as hiccup] [net.deertopia.doerg.html :as doerg-html] + [net.deertopia.publisher :as-alias publisher] [net.deertopia.publisher.slug :as slug] [net.deertopia.publisher.config :as cfg] [net.deertopia.publisher.roam :as roam] @@ -101,7 +102,7 @@ (throw (ex-info msg {}))) (do (reset! server (http/run-server (bound-fn* #'app) - {:port 8080 + {:port (-> cfg/*cfg* ::publisher/port) :legacy-return-value? false})) ;; For some reason, the log messages are not flushed before ;; the JVM shuts dowm. Nevertheless, the server /does/ come