diff options
Diffstat (limited to 'env/dev/clj')
-rw-r--r-- | env/dev/clj/queue_api/dev_middleware.clj | 10 | ||||
-rw-r--r-- | env/dev/clj/queue_api/env.clj | 14 | ||||
-rw-r--r-- | env/dev/clj/user.clj | 16 |
3 files changed, 40 insertions, 0 deletions
diff --git a/env/dev/clj/queue_api/dev_middleware.clj b/env/dev/clj/queue_api/dev_middleware.clj new file mode 100644 index 0000000..ece7a25 --- /dev/null +++ b/env/dev/clj/queue_api/dev_middleware.clj @@ -0,0 +1,10 @@ +(ns queue-api.dev-middleware + (:require [ring.middleware.reload :refer [wrap-reload]] + [selmer.middleware :refer [wrap-error-page]] + [prone.middleware :refer [wrap-exceptions]])) + +(defn wrap-dev [handler] + (-> handler + wrap-reload + wrap-error-page + wrap-exceptions)) diff --git a/env/dev/clj/queue_api/env.clj b/env/dev/clj/queue_api/env.clj new file mode 100644 index 0000000..1f31ba5 --- /dev/null +++ b/env/dev/clj/queue_api/env.clj @@ -0,0 +1,14 @@ +(ns queue-api.env + (:require [selmer.parser :as parser] + [clojure.tools.logging :as log] + [queue-api.dev-middleware :refer [wrap-dev]])) + +(def defaults + {:init + (fn [] + (parser/cache-off!) + (log/info "\n-=[queue-api started successfully using the development profile]=-")) + :stop + (fn [] + (log/info "\n-=[queue-api has shut down successfully]=-")) + :middleware wrap-dev}) diff --git a/env/dev/clj/user.clj b/env/dev/clj/user.clj new file mode 100644 index 0000000..843b558 --- /dev/null +++ b/env/dev/clj/user.clj @@ -0,0 +1,16 @@ +(ns user + (:require + [mount.core :as mount] + [queue-api.core :refer [start-app]])) + +(defn start [] + (mount/start-without #'queue-api.core/repl-server)) + +(defn stop [] + (mount/stop-except #'queue-api.core/repl-server)) + +(defn restart [] + (stop) + (start)) + + |