🎉 Add socket repl.

backend/src/app/main.clj

@@ -27,6 +27,7 @@
 (defn run
   [params]
   (require 'app.config
+           'app.srepl.server
            'app.migrations
            'app.worker
            'app.media

backend/src/app/srepl/main.clj

@@ -0,0 +1,5 @@
+(ns app.srepl.main
+  "A  main namespace for server repl."
+  (:require
+   [clojure.pprint :refer [pprint]]
+   [app.db :as db]))

backend/src/app/srepl/server.clj

@@ -0,0 +1,30 @@
+(ns app.srepl.server
+  "Server Repl."
+  (:require
+   [clojure.pprint :refer [pprint]]
+   [clojure.main :as cm]
+   [clojure.core.server :as ccs]
+   [app.srepl.main]
+   [mount.core :as mount :refer [defstate]]))
+
+(defn- repl-init
+  []
+  (ccs/repl-init)
+  (in-ns 'app.srepl.main))
+
+(defn repl
+  []
+  (cm/repl
+   :init repl-init
+   :read ccs/repl-read))
+
+(defstate server
+  :start (ccs/start-server
+          {:address "127.0.0.1"
+           :port 6061
+           :name "main"
+           :accept 'app.srepl.server/repl})
+  :stop (ccs/stop-server "main"))
+
+
+