[cl-xmpp-cvs] CVS update: cl-xmpp/test/cl-xmpp-test.lisp cl-xmpp/test/cl-xmpp-test.asd cl-xmpp/test/result-test.lisp

[Erik Enge]

Update of /project/cl-xmpp/cvsroot/cl-xmpp/test
In directory common-lisp.net:/tmp/cvs-serv29110/test

Modified Files:
	cl-xmpp-test.asd result-test.lisp 
Added Files:
	cl-xmpp-test.lisp 
Log Message:
more tests and updated README slightly

Date: Sun Nov 13 03:55:47 2005
Author: eenge



Index: cl-xmpp/test/cl-xmpp-test.asd
diff -u cl-xmpp/test/cl-xmpp-test.asd:1.1 cl-xmpp/test/cl-xmpp-test.asd:1.2
--- cl-xmpp/test/cl-xmpp-test.asd:1.1	Sun Nov 13 03:36:11 2005
+++ cl-xmpp/test/cl-xmpp-test.asd	Sun Nov 13 03:55:47 2005
@@ -1,5 +1,5 @@
 ;;;; -*- mode: lisp -*-
-;;;; $Id: cl-xmpp-test.asd,v 1.1 2005/11/13 02:36:11 eenge Exp $
+;;;; $Id: cl-xmpp-test.asd,v 1.2 2005/11/13 02:55:47 eenge Exp $
 ;;;; $Source: /project/cl-xmpp/cvsroot/cl-xmpp/test/cl-xmpp-test.asd,v $
 
 ;;;; See the LICENSE file for licensing information.
@@ -21,5 +21,7 @@
                  (:file "utility-test"
                   :depends-on ("package"))
                  (:file "result-test"
+                  :depends-on ("package"))))   
+                 (:file "cl-xmpp-test"
                   :depends-on ("package"))))   
 


Index: cl-xmpp/test/result-test.lisp
diff -u cl-xmpp/test/result-test.lisp:1.2 cl-xmpp/test/result-test.lisp:1.3
--- cl-xmpp/test/result-test.lisp:1.2	Sun Nov 13 03:45:41 2005
+++ cl-xmpp/test/result-test.lisp	Sun Nov 13 03:55:47 2005
@@ -1,4 +1,4 @@
-;;;; $Id: result-test.lisp,v 1.2 2005/11/13 02:45:41 eenge Exp $
+;;;; $Id: result-test.lisp,v 1.3 2005/11/13 02:55:47 eenge Exp $
 ;;;; $Source: /project/cl-xmpp/cvsroot/cl-xmpp/test/result-test.lisp,v $
 
 ;;;; See the LICENSE file for licensing information.
@@ -14,4 +14,4 @@
 
 (deftest get-element.1 (xmpp:get-element *empty-element* :x) nil)
 (deftest get-element.2 (xmpp:get-element *element+subelement* :x) nil)
-(deftest get-element.3 (xmpp:get-element *element+subelement* :subtest) #.*sub-element*)
+(deftest get-element.3 (xmpp:name (xmpp:get-element *element+subelement* :subtest)) :subtest)