diff --git a/routes/get.clj b/routes/get.clj index ce9d1a5..e283f84 100644 --- a/routes/get.clj +++ b/routes/get.clj @@ -1,8 +1,17 @@ [:html - [:h1 "UI operations"] + [:h1 "Aidbox UI projects"] + + + [:ul + [:li [:a {:href "/ui/auth/userifno"} "Auth UI"]] + [:li [:a {:href "/ui/patients"} "Patient CRUD"]] + [:li [:a {:href "/ui/chat"} "Chat App"]] + [:li [:a {:href "/ui/forms/responses"} "Aidbox Forms"]]] + (for [op (map :resource (box/sql "select * from operation where id like 'aidbox-%'"))] [:div (str (:request op))]) ] +