Permalink
Browse files

Merge pull request #9 from frenchy64/patch-1

defconstrainedtype fixed for contract docstring.
  • Loading branch information...
2 parents 04b1b08 + 514980e commit 4f3afc26f48faa59514e56465c7086618237dee2 @fogus fogus committed Nov 30, 2011
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/trammel/core.clj
View
@@ -281,7 +281,7 @@
(= t# (type r#))))
(let [chk# (contract ~(symbol (str "chk-" name))
- (str "Invariant contract for " (str ~name))
+ ~(str "Invariant contract for " name)
[{:keys ~fields :as m#}] ~invariants)]
(defconstrainedfn ~factory-name
([] [] (~ctor-name ~@defaults))

0 comments on commit 4f3afc2

Please sign in to comment.