summaryrefslogtreecommitdiff
path: root/src/chef/pages/admin.clj
blob: 9aaade3aa4086eb8594c0f01a0b22246f8bb001a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
(ns chef.pages.admin
  (:require [chef.utils :as cutils]
            [hiccup2.core :as html]
            [ring.util.response :as ruresp]))

(defn- render []
  (cutils/gen-page "chef - Admin"
                   [:h1 "chef - Admin"]
                   [:h2 "Kategorien"]
                   ;;TODO: add delete icons to non-root categories
                   [:ul
                    [:li
                     [:p {:style {:display :inline-block}} "Startseite"]
                     [:p {:style {:display      :inline-block
                                  :margin-left  "1em"
                                  :margin-right "1em"}} "->"]
                     [:input {:type  :text :placeholder "Frage"
                              :style {:display :inline-block
                                      :width   :auto}}]     ; TODO: only show when category has children
                     [:img {:src   "/static/icons/plus.svg" :height "30em"
                            :style {:vertical-align :middle
                                    :margin-left    "1em"}}]]]
                   [:h2 "Rezepte"]
                   [:i "Coming soon..."]))

(defn handler [req]
  (cutils/auth-only req
                    (-> (render)
                        html/html
                        str
                        ruresp/response)))