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