mirror of
https://github.com/metosin/reitit.git
synced 2025-12-16 16:01:11 +00:00
10 lines
387 B
Clojure
10 lines
387 B
Clojure
(ns backend.server
|
|
(:require [ring.util.response :as resp]
|
|
[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))
|