aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--json-template.lisp5
1 files changed, 3 insertions, 2 deletions
diff --git a/json-template.lisp b/json-template.lisp
index 7aacee6..0e39004 100644
--- a/json-template.lisp
+++ b/json-template.lisp
@@ -155,8 +155,9 @@
(let ((value (lookup-context contexts variable)))
(format stream "~A"
(if filter
- (funcall (cdr (assoc filter *template-filters*))
- value)
+ (funcall (cdr (assoc filter *template-filters*
+ :test #'equal))
+ value)
value)))))
(:section
(destructuring-bind (section branch alternative) (cdr thing)