[claw-cvs] r33 - trunk/main/claw-core/tests

[achiumenti at common-lisp.net]

Author: achiumenti
Date: Wed Apr  9 13:59:03 2008
New Revision: 33

Modified:
   trunk/main/claw-core/tests/test1.lisp
Log:
clutter removing

Modified: trunk/main/claw-core/tests/test1.lisp
==============================================================================
--- trunk/main/claw-core/tests/test1.lisp	(original)
+++ trunk/main/claw-core/tests/test1.lisp	Wed Apr  9 13:59:03 2008
@@ -115,7 +115,7 @@
   (html> 
    (head>
     (title> 
-     (wcomponent-parameter-value o ':title))
+     (wcomponent-parameter-value o :title))
     (style> :type "text/css"
 "input.error {
   background-color: #FF9999;