diff options
| author | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2011-11-09 15:13:11 +0100 |
|---|---|---|
| committer | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2011-11-09 15:13:11 +0100 |
| commit | 9d556a9a1ae3172584fb12eb9932cb08c3ab44a0 (patch) | |
| tree | fe84d6731a0f5e5ea26b32b90886758f17a967b8 /src/mulk/benki/main.clj | |
| parent | 2cca481f2692e43ad4051c7532a6208b91733cbc (diff) | |
Remove example pages.
Diffstat (limited to 'src/mulk/benki/main.clj')
| -rw-r--r-- | src/mulk/benki/main.clj | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/src/mulk/benki/main.clj b/src/mulk/benki/main.clj index 6be5007..40c07cc 100644 --- a/src/mulk/benki/main.clj +++ b/src/mulk/benki/main.clj @@ -28,26 +28,6 @@ ) -(defpage "/welcome" [] - "<h1>Hello World</h1> - - <p>Hi!</p>") - -(defpage "/hello" {name :name} - (layout - [:h1 "Greeting"] - [:p (fmt nil "Hi~@[ ~A~]!" name)])) - -(defpage "/journal/:id" {id :id} - (layout - [:h1 "Journal Entry #" id] - [:p "Bla bla bla."])) - -(defpage "/journal" {} - (layout - [:h1 "Journal"])) - - (defn -main [& args] (loop [] (Thread/sleep 1000000) |