diff options
| -rw-r--r-- | src/clojure/contrib/macros.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/clojure/contrib/macros.clj b/src/clojure/contrib/macros.clj index 7d2cc642..34e8d1f8 100644 --- a/src/clojure/contrib/macros.clj +++ b/src/clojure/contrib/macros.clj @@ -19,7 +19,7 @@ "A variant of let for local function definitions. fn-bindings consists of name/args/body triples, with (letfn [name args body] ...) being equivalent to (let [name (fn name args body)] ...)." - [fn-bindings exprs] + [fn-bindings & exprs] (let [makefn (fn [[name args body]] (list name (list 'fn name args body))) fns (vec (apply concat (map makefn (partition 3 fn-bindings))))] - `(let ~fns ~exprs))) + `(let ~fns ~@exprs))) |