mirror of
https://github.com/metosin/reitit.git
synced 2025-12-17 00:11:11 +00:00
12 lines
424 B
Clojure
12 lines
424 B
Clojure
|
(ns backend.server
|
||
|
|
(:require [clojure.java.io :as io]
|
||
|
|
[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))
|