diff options
Diffstat (limited to 'src/chef')
| -rw-r--r-- | src/chef/database/init.clj | 2 | ||||
| -rw-r--r-- | src/chef/pages/admin.clj | 22 | ||||
| -rw-r--r-- | src/chef/pages/home.clj | 2 |
3 files changed, 23 insertions, 3 deletions
diff --git a/src/chef/database/init.clj b/src/chef/database/init.clj index f791e39..803e85a 100644 --- a/src/chef/database/init.clj +++ b/src/chef/database/init.clj @@ -8,7 +8,7 @@ [:name :text] [:question :text] [:children :text] - [:parent :text]]})) + [:parent :text]]})) ;TODO: create root category (jdbc/execute! db (sql/format {:create-table :recipes :with-columns [[:id :integer :auto-increment :primary-key] [:category :integer] diff --git a/src/chef/pages/admin.clj b/src/chef/pages/admin.clj index 3e2b0a1..9aaade3 100644 --- a/src/chef/pages/admin.clj +++ b/src/chef/pages/admin.clj @@ -3,9 +3,29 @@ [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 - (-> (cutils/gen-page "chef - Dashboard" [:i "Coming soon..."]) + (-> (render) html/html str ruresp/response))) diff --git a/src/chef/pages/home.clj b/src/chef/pages/home.clj index 210fbed..2060668 100644 --- a/src/chef/pages/home.clj +++ b/src/chef/pages/home.clj @@ -3,7 +3,7 @@ [ring.util.response :as ruresp] [chef.utils :as cutils])) -(defn render [] +(defn- render [] (cutils/gen-page "chef" [:div {:style {:text-align :center}} [:h1 "chef"] |