You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
21 lines
609 B
Clojure
21 lines
609 B
Clojure
(ns masto-embed.routes.home
|
|
(:require
|
|
[masto-embed.layout :as layout]
|
|
[clojure.java.io :as io]
|
|
[masto-embed.middleware :as middleware]
|
|
[ring.util.response]
|
|
[ring.util.http-response :as response]))
|
|
|
|
(defn home-page [request]
|
|
(layout/render request "home.html"))
|
|
|
|
(defn home-routes []
|
|
[""
|
|
{:middleware [middleware/wrap-csrf
|
|
middleware/wrap-formats]}
|
|
["/" {:get home-page}]
|
|
["/docs" {:get (fn [_]
|
|
(-> (response/ok (-> "docs/docs.md" io/resource slurp))
|
|
(response/header "Content-Type" "text/plain; charset=utf-8")))}]])
|
|
|