Permalink
Browse files

Now expects string keys for parameters, rather than keywords

  • Loading branch information...
1 parent 05fdace commit c6f9589ab438f6e217d416776ce639280e6cad40 @weavejester committed Mar 28, 2010
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/compojure/core.clj
View
@@ -41,7 +41,7 @@
"Create the bindings for a vector of parameters."
[request bindings body]
(let [[args [_ more]] (split-with #(not= % '&) bindings)]
- `(let [{:keys ~(vec args)} (~request :params)
+ `(let [{:strs ~(vec args)} (~request :params)
~@(if more [more `(dissoc (~request :params) ~@(map keyword args))])]
~@body)))

0 comments on commit c6f9589

Please sign in to comment.