[elephant-cvs] CVS elephant/tests

rread rread at common-lisp.net
Mon Jun 4 20:02:17 UTC 2007


Update of /project/elephant/cvsroot/elephant/tests
In directory clnet:/tmp/cvs-serv15491

Modified Files:
	testserializer.lisp 
Log Message:
Correcting cut-and-paste error


--- /project/elephant/cvsroot/elephant/tests/testserializer.lisp	2007/06/04 19:43:17	1.22
+++ /project/elephant/cvsroot/elephant/tests/testserializer.lisp	2007/06/04 20:02:16	1.23
@@ -404,7 +404,7 @@
      (value :type '(or list string) :initform "" :accessor :vl :initarg :value)))
 
 (deftest test-serialization-unicode-slot
-    (let ((s (make-instance 'CL-USER::Message :msgid '(a b c) :value  "Mesaĝo Teksto")))
+    (let ((s (make-instance 'spud :msgid '(a b c) :value  "Mesaĝo Teksto")))
       (in-out-equal s)
       )
 )




More information about the Elephant-cvs mailing list