reitit/examples/frontend-prompt/src/backend/server.clj

11 lines
387 B
Clojure
Raw Normal View History

2019-04-20 14:26:48 +00:00
(ns backend.server
(:require [ring.util.response :as resp]
2019-04-20 14:26:48 +00:00
[ring.middleware.content-type :as content-type]))
(def handler
(-> (fn [request]
(or (resp/resource-response (:uri request) {:root "public"})
(-> (resp/resource-response "index.html" {:root "public"})
(resp/content-type "text/html"))))
content-type/wrap-content-type))