diff --git a/src/web-app.lisp b/src/web-app.lisp index 644896c..0ee8815 100644 --- a/src/web-app.lisp +++ b/src/web-app.lisp @@ -36,14 +36,18 @@ (defparameter *template-product* " {{ product }} +{% if debug %} + debug info! +{% endif %} ") (easy-routes:defroute root ("/") () (render *template-root* :products (products))) -(easy-routes:defroute product-route ("/product/:n") (&path (n 'integer)) - (render *template-product* :product (get-product n))) +(easy-routes:defroute product-route ("/product/:n") + (&get debug &path (n 'integer)) + (render *template-product* :product (get-product n) :debug debug)) (defroute root ("/" :method :get) () (render-products))