You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
29 lines
924 B
29 lines
924 B
(ns wanijo-pipeline.ui-selection
|
|
(:require
|
|
[hiccup.core :as h]
|
|
[lambdaui.core :as lambdaui]
|
|
[lambdacd.ui.core :as reference-ui]
|
|
[compojure.core :refer [routes GET context]])
|
|
(:gen-class))
|
|
|
|
(defn- ui-selection []
|
|
(h/html
|
|
[:html
|
|
[:head
|
|
[:title "LambdaCD - UI Selection"]]
|
|
[:body
|
|
[:h1 "LambdaCD - UI Selection"]
|
|
[:ul
|
|
[:li [:a {:href "./wanijo/lambdaui/index.html"} "Wanijo"]]
|
|
[:li [:a {:href "./formulare/lambdaui/index.html"} "Formulare"]]]]]))
|
|
|
|
(defn ui-routes [wanijo formulare wedder]
|
|
(let [wanijo-app (lambdaui/ui-for wanijo :contextPath "/wanijo")
|
|
formulare-app (lambdaui/ui-for formulare :contextPath "/formulare")
|
|
wedder-app (lambdaui/ui-for wedder :contextPath "/wedder")]
|
|
(routes
|
|
(GET "/" [] (ui-selection))
|
|
(context "/wanijo" [] wanijo-app)
|
|
(context "/formulare" [] formulare-app)
|
|
(context "/wedder" [] wedder-app))))
|