Added a boilerplate luminus project
+re-frame +swagger +oauth - probably this is massive overkill
This commit is contained in:
parent
94abf7aae8
commit
bad860f78e
42 changed files with 1132 additions and 0 deletions
10
env/dev/clj/ireadit/dev_middleware.clj
vendored
Normal file
10
env/dev/clj/ireadit/dev_middleware.clj
vendored
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
(ns ireadit.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 {:app-namespaces ['ireadit]})))
|
||||
14
env/dev/clj/ireadit/env.clj
vendored
Normal file
14
env/dev/clj/ireadit/env.clj
vendored
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
(ns ireadit.env
|
||||
(:require [selmer.parser :as parser]
|
||||
[clojure.tools.logging :as log]
|
||||
[ireadit.dev-middleware :refer [wrap-dev]]))
|
||||
|
||||
(def defaults
|
||||
{:init
|
||||
(fn []
|
||||
(parser/cache-off!)
|
||||
(log/info "\n-=[ireadit started successfully using the development profile]=-"))
|
||||
:stop
|
||||
(fn []
|
||||
(log/info "\n-=[ireadit has shut down successfully]=-"))
|
||||
:middleware wrap-dev})
|
||||
12
env/dev/clj/ireadit/figwheel.clj
vendored
Normal file
12
env/dev/clj/ireadit/figwheel.clj
vendored
Normal file
|
|
@ -0,0 +1,12 @@
|
|||
(ns ireadit.figwheel
|
||||
(:require [figwheel-sidecar.repl-api :as ra]))
|
||||
|
||||
(defn start-fw []
|
||||
(ra/start-figwheel!))
|
||||
|
||||
(defn stop-fw []
|
||||
(ra/stop-figwheel!))
|
||||
|
||||
(defn cljs []
|
||||
(ra/cljs-repl))
|
||||
|
||||
21
env/dev/clj/user.clj
vendored
Normal file
21
env/dev/clj/user.clj
vendored
Normal file
|
|
@ -0,0 +1,21 @@
|
|||
(ns user
|
||||
(:require [ireadit.config :refer [env]]
|
||||
[clojure.spec.alpha :as s]
|
||||
[expound.alpha :as expound]
|
||||
[mount.core :as mount]
|
||||
[ireadit.figwheel :refer [start-fw stop-fw cljs]]
|
||||
[ireadit.core :refer [start-app]]))
|
||||
|
||||
(alter-var-root #'s/*explain-out* (constantly expound/printer))
|
||||
|
||||
(defn start []
|
||||
(mount/start-without #'ireadit.core/repl-server))
|
||||
|
||||
(defn stop []
|
||||
(mount/stop-except #'ireadit.core/repl-server))
|
||||
|
||||
(defn restart []
|
||||
(stop)
|
||||
(start))
|
||||
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue