You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
dda-masto-embed/masto-embed/env/dev/clj/user.clj

34 lines
754 B
Clojure

(ns user
"Userspace functions you can run by default in your local REPL."
(:require
[masto-embed.config :refer [env]]
[clojure.pprint]
[clojure.spec.alpha :as s]
[expound.alpha :as expound]
[mount.core :as mount]
[masto-embed.figwheel :refer [start-fw stop-fw cljs]]
[masto-embed.core :refer [start-app]]))
(alter-var-root #'s/*explain-out* (constantly expound/printer))
(add-tap (bound-fn* clojure.pprint/pprint))
(defn start
"Starts application.
You'll usually want to run this on startup."
[]
(mount/start-without #'masto-embed.core/repl-server))
(defn stop
"Stops application."
[]
(mount/stop-except #'masto-embed.core/repl-server))
(defn restart
"Restarts application."
[]
(stop)
(start))