Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-15 03:28:25 -05:00
Code Issues Activity

🎉 Add socket repl.

Browse source
This commit is contained in:
Andrey Antukh 2020-11-12 12:00:32 +01:00 • committed by Alonso Torres
parent 29180e4196
commit 4ad08a7449
4 changed files with 36 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
backend/deps.edn
View file

@ -37,7 +37,6 @@
funcool/promesa {:mvn/version "5.1.0"} funcool/promesa {:mvn/version "5.1.0"}
funcool/cuerdas {:mvn/version "2020.03.26-3"} funcool/cuerdas {:mvn/version "2020.03.26-3"}
buddy/buddy-core {:mvn/version "1.8.0"} buddy/buddy-core {:mvn/version "1.8.0"}
buddy/buddy-hashers {:mvn/version "1.6.0"} buddy/buddy-hashers {:mvn/version "1.6.0"}
buddy/buddy-sign {:mvn/version "3.2.0"} buddy/buddy-sign {:mvn/version "3.2.0"}

1
backend/src/app/main.clj
View file

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

5
backend/src/app/srepl/main.clj Normal file
View file

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

30
backend/src/app/srepl/server.clj Normal file
View file

@ -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"))