From 2f6bd466afd2463b96e2b1c8047c63054155b727 Mon Sep 17 00:00:00 2001 From: Matthias Andreas Benkard Date: Wed, 2 Mar 2011 18:28:26 +0100 Subject: Adapt to latest version of cl-json-template. --- mulkcms.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mulkcms.lisp b/mulkcms.lisp index 444cafa..fbbbb56 100644 --- a/mulkcms.lisp +++ b/mulkcms.lisp @@ -3,7 +3,7 @@ (defparameter *database-connection-spec* (list *database-name* *database-user* *database-password* *database-host*)) -(unless (member "html" *template-filters* :key #'car :test #'equal) +(unless (member "html" *template-formatters* :key #'car :test #'equal) (push `("html" . ,(lambda (x) (cl-who:escape-string (string x)))) *template-filters*) (push `("html-attr-value" . ,(lambda (x) (cl-who:escape-string (string x)))) -- cgit v1.2.3