comply with hy's tao rules for getattr

This commit is contained in:
Guillermo Vaya 2013-09-23 01:23:44 +02:00
parent 3f1243f88c
commit ff7c71b9c9

View File

@ -3,13 +3,13 @@
(defmacro route [name path params code]
"Default get request"
`(let [[deco ((getattr app "route") ~path)]]
`(let [[deco (.route app ~path)]]
(with-decorator deco
(defn ~name ~params ~@code))))
(defmacro route-with-methods [name path params code methods]
"Same as route but with an extra methods array to specify HTTP methods"
`(let [[deco (kwapply ((getattr app "route") ~path)
`(let [[deco (kwapply (.route app ~path)
{"methods" ~methods})]]
(with-decorator deco
(defn ~name ~params ~@code))))