From: Drew Crampsie <drewc@tech.coop>
Date: Fri, 21 Oct 2005 23:30:17 +0000 (-0700)
Subject: minor formatting fixes
X-Git-Url: https://git.hcoop.net/clinton/lisp-on-lines.git/commitdiff_plain/4b89398719b476b10abb021227fc32fffe94d17f

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
--- 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))