diff options
| author | Jake Zerrer <him@jakezerrer.com> | 2025-11-30 12:31:01 -0500 |
|---|---|---|
| committer | Jake Zerrer <him@jakezerrer.com> | 2025-11-30 17:27:46 -0500 |
| commit | 119cf7f780375187dbe3d064263a9de3a17f538d (patch) | |
| tree | 376d48fc42d19ed49ca3f740e7c0e4c15596d11d /dev | |
| parent | 034e30d70aeac7ce18f34be6a1c211730e9fd7fb (diff) | |
Move from github pages to server
Diffstat (limited to 'dev')
| -rw-r--r-- | dev/repl.clj | 41 |
1 files changed, 0 insertions, 41 deletions
diff --git a/dev/repl.clj b/dev/repl.clj deleted file mode 100644 index ced6fae..0000000 --- a/dev/repl.clj +++ /dev/null @@ -1,41 +0,0 @@ -(ns repl - (:require [core :refer [-main]] - [ring.adapter.jetty :as jetty] - [ring.middleware.file :as file] - [ring.middleware.content-type :as content-type] - [ring.util.response :as response])) - -(defonce server (atom nil)) - -(defn app [request] - (or ((file/wrap-file identity "target/html") request) - (response/not-found "Not Found"))) - -(def handler - (-> app - content-type/wrap-content-type)) - -(defn start [] - (when-not @server - (reset! server (jetty/run-jetty handler {:port 8080 :join? false})) - (println "Server started on http://localhost:8080"))) - -(defn stop [] - (when @server - (.stop @server) - (reset! server nil) - (println "Server stopped"))) - -(defn restart [] - (stop) - (start)) - -(defn serve [] - (start)) - -(defn build [] - (-main)) - -(comment - (restart) - (build)) |
