Я использую сервер с веб-платформой luminus, которая использует кольцо/compojure, и я хочу иметь возможность подключаться к моему коду с помощью clojure repl. Я понимаю, что есть сервер nrepl
, который означает network repl, и что вы можете подключиться к нему через: `lein repl :connect user@host:port (или какой-то другой протокол, я пробовал кое-что).
Следующий код из repl.clj
создается, когда вы автоматически генерируете проект luminus с помощью `lein new luminus [имя проекта] (на самом деле я добавил часть browser-repl, необходимую для присоединения clojurescript repl).
(ns sophia-site.repl
(:require [cemerick.piggieback :as pig]
[weasel.repl.websocket])
(:use sophia-site.handler
ring.server.standalone
[ring.middleware file-info file]))
(defn browser-repl []
(pig/cljs-repl :repl-env
(weasel.repl.websocket/repl-env :ip "localhost" :port 9001)))
(defonce server (atom nil))
(defn get-handler []
;; #'app expands to (var app) so that when we reload our code,
;; the server is forced to re-resolve the symbol in the var
;; rather than having its own copy. When the root binding
;; changes, the server picks it up without having to restart.
(-> #'app
; Makes static assets in $PROJECT_DIR/resources/public/ available.
(wrap-file "resources")
; Content-Type, Content-Length, and Last Modified headers for files in body
(wrap-file-info)))
(defn start-server
"used for starting the server in development mode from REPL"
[& [port]]
(let [port (if port (Integer/parseInt port) 8080)]
(reset! server
(serve (get-handler)
{:port port
:init init
:auto-reload? true
:destroy destroy
:join? false}))
(println (str "You can view the site at http://some-ip:" port))))
(defn stop-server []
(.stop @server)
(reset! server nil))
У меня не получилось с lein repl :connect ...
- Что я могу сделать, чтобы прикрепить реплику clojure к моему коду на сервере?
Спасибо за помощь