removed errant paren

[clinton/lisp-on-lines.git] / src / slot-presentations.lisp

diff --git a/src/slot-presentations.lisp b/src/slot-presentations.lisp
index 19927f9..6acc8a9 100644 (file)
--- a/src/slot-presentations.lisp
+++ b/src/slot-presentations.lisp
@@ -29,7 +29,7 @@
         :cols (columns slot))
        (if (escape-html-p slot)
            (<:as-html (presentation-slot-value slot instance))
-           (<:as-is (presentation-slot-value slot instance))))))
+           (<:as-is (presentation-slot-value slot instance)))))
 
 
 (defcomponent mewa-slot-presentation ()