diff options
Diffstat (limited to 'cljssss-g.clj')
-rw-r--r-- | cljssss-g.clj | 15 |
1 files changed, 7 insertions, 8 deletions
diff --git a/cljssss-g.clj b/cljssss-g.clj index 6987a56..f5c4775 100644 --- a/cljssss-g.clj +++ b/cljssss-g.clj @@ -1,17 +1,16 @@ (ns cljssss-g - (require [net.cgrand.enlive-html :as enlive] - [clojure.xml :as xml] + (require [clojure.xml :as xml] compojure) + (import (org.antlr.stringtemplate StringTemplateGroup)) (use compojure)) +(def tgroup (new StringTemplateGroup "")) + (defservlet cljssss-g (GET "/" - (html [:html - [:head - [:title "Gödel-Gentzen Clojure Syndication Services Super System"]] - [:body - [:h1 "Gödel-Gentzen Clojure Syndication Services Super System"] - [:p "Fnord."]]])) + (.toString + (doto (.getInstanceOf tgroup "index") + (.setAttributes {"title" "Subscriptions"})))) (ANY "*" (page-not-found))) |