Add author page

1 files changed, 12 insertions, 7 deletions

diff --git a/src/app.phel b/src/app.phel
index ac3b94e..8bb61c1 100644
--- a/src/app.phel
+++ b/src/app.phel
@@ -3,14 +3,19 @@
   (:require phel.router :as r)
   (:require phel.http :as h))
 
+(def- router
+  (r/router
+   [["/" {:handler (fn [req]
+                     (routes/index-handler req router))}]
+    ["/ping" {:name ::ping
+              :get {:handler routes/ping-handler}
+              :post {:handler routes/ping-handler}}]
+    ["/book" {:post {:handler routes/book-create-handler}}]
+    ["/author/{id}" {:name :author
+                     :get {:handler routes/author-view-handler}}]]))
+
 (def app
-  (r/handler
-   (r/router
-    [["/" {:handler routes/index-handler}]
-     ["/ping" {:name ::ping
-               :get {:handler routes/ping-handler}
-               :post {:handler routes/ping-handler}}]
-     ["/book" {:post {:handler routes/book-create-handler}}]])))
+  (r/handler router))
 
 (when-not *build-mode*
   (h/emit-response (app (h/request-from-globals))))