Adds new default admin page
This commit is contained in:
@@ -1,7 +1,12 @@
|
||||
(ns auto-ap.ssr.pos.common
|
||||
(:require [auto-ap.ssr.components :as com]
|
||||
[auto-ap.ssr.components.date-range :as dr]
|
||||
[auto-ap.time :as atime]
|
||||
[auto-ap.ssr.svg :as svg]))
|
||||
(defn date-range-field* [request]
|
||||
(dr/date-range-field {:value {:start (:start-date (:parsed-query-params request))
|
||||
:end (:end-date (:parsed-query-params request))}
|
||||
:id "date-range"}))
|
||||
|
||||
(defn processor-field* [request]
|
||||
(com/field {:label "Processor"}
|
||||
|
||||
Reference in New Issue
Block a user