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

[Erik Enge]

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

Modified Files:
	cl-xmpp.asd 
Log Message:
adding a test-op on cl-xmpp to run do-tests from cl-xmpp-test

Date: Wed Dec 14 20:03:49 2005
Author: eenge

Index: cl-xmpp/cl-xmpp.asd
diff -u cl-xmpp/cl-xmpp.asd:1.6 cl-xmpp/cl-xmpp.asd:1.7
--- cl-xmpp/cl-xmpp.asd:1.6	Sun Nov 13 03:36:10 2005
+++ cl-xmpp/cl-xmpp.asd	Wed Dec 14 20:03:48 2005
@@ -1,5 +1,5 @@
 ;;;; -*- mode: lisp -*-
-;;;; $Id: cl-xmpp.asd,v 1.6 2005/11/13 02:36:10 eenge Exp $
+;;;; $Id: cl-xmpp.asd,v 1.7 2005/12/14 19:03:48 eenge Exp $
 ;;;; $Source: /project/cl-xmpp/cvsroot/cl-xmpp/cl-xmpp.asd,v $
 
 ;;;; See the LICENSE file for licensing information.
@@ -28,4 +28,8 @@
 			:depends-on ("cxml"))
                  (:file "cl-xmpp"
                         :depends-on ("result"))))
+
+(defmethod perform ((operation test-op) (component (eql (find-system 'cl-xmpp))))
+  (operate 'load-op 'cl-xmpp-test)
+  (operate 'test-op 'cl-xmpp-test :force t))