25 lines
841 B
Clojure
25 lines
841 B
Clojure
(ns user
|
|
(:require [net.deertopia.publisher.server :as server]
|
|
[net.deertopia.doerg :as-alias doerg]
|
|
[net.deertopia.publisher :as-alias publisher]
|
|
[net.deertopia.doerg.config :as doerg-config]
|
|
[net.deertopia.publisher.config :as publisher-config]
|
|
[babashka.fs :as fs]))
|
|
|
|
(doerg-config/load-config! #'doerg-config/*cfg*
|
|
::doerg/config
|
|
doerg-config/sources
|
|
:profile :dev)
|
|
|
|
(doerg-config/load-config! #'publisher-config/*cfg*
|
|
::publisher/config
|
|
publisher-config/sources
|
|
:profile :dev)
|
|
|
|
(when (not= :running (server/status))
|
|
(server/start!))
|
|
|
|
(defn invalidate-html-cache! []
|
|
(fs/delete-tree (server/html-dir))
|
|
nil)
|