add staff/before-leaving page

1 files changed, 36 insertions, 0 deletions

diff --git a/pages/staff/before-leaving.fnl b/pages/staff/before-leaving.fnl
new file mode 100644
index 0000000..b358bdf
--- /dev/null
+++ b/pages/staff/before-leaving.fnl
@@ -0,0 +1,36 @@
+(local templates (require :templates))
+(local html (require :vendor.html))
+
+(local content
+  [[:article {:class "article"}
+    [:img {:class "logo" :src "/static/logo.svg"
+           :alt "Белая жаба в мультяшном стиле с чайником на голове"}]
+    [:h1 {} [:NO-ESCAPE "Чайная «Белая жаба»"]]
+    [:nav {}
+     [:a {:href "https://t.me/whitetoadtea"} "телеграм"]
+     [:span {} "~"]
+     [:a {:href "https://vk.com/whitetoadtea"} "вконтакте"]]
+    [:p {}
+     (table.unpack
+      (icollect [_ v (ipairs ["Затушить свечи"
+                              "Убрать чай"
+                              "Промыть, протереть и убрать посуду"
+                              "Слить и протереть чабань"
+                              "Протереть стол"
+                              "Слить чайник"
+                              "Слить ведро"
+                              "Закрыть окна"
+                              "Вытащить электронику из розеток"
+                              "Выключить сетевой фильтр"
+                              "Выключить гирлянды"
+                              "Закрыть дверь в офис"
+                              "Поставить на сигнализацию"
+                              "Закрыть дверь в офисы (если уходим последние)"])]
+        [:div {}
+         [:label {:class "form-row"}
+          [:input {:type "checkbox"}] v]]))]]])
+
+(fn render [request]
+ (values 200 {} (html.render (templates.base-template content) true)))
+
+{: render}