minor formatting fixes

darcs-hash:20051021233017-5417e-632dd3f5f83a56acb3bcf373da4731ac7610f873.gz

diff --git a/src/mewa/slot-presentations.lisp b/src/mewa/slot-presentations.lisp
index 82893a5..952196f 100644 (file)
--- a/src/mewa/slot-presentations.lisp
+++ b/src/mewa/slot-presentations.lisp
@@ -26,8 +26,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 ()
@@ -173,8 +172,6 @@ Calendar.setup({
        (setf (component.place pres) (component.place (ucw::parent slot))))
       (when i (<ucw:render-component :component pres))))
 
-
-
 (defmethod present-slot ((slot mewa-relation-slot-presentation) instance)
   (present-relation slot instance))