Update of /project/cl-xmpp/cvsroot/cl-xmpp/test In directory clnet:/tmp/cvs-serv13890/test Modified Files: cl-xmpp-test.asd Log Message: commiting fixes from Robert Brown, thanks! --- /project/cl-xmpp/cvsroot/cl-xmpp/test/cl-xmpp-test.asd 2005/12/14 19:04:07 1.4 +++ /project/cl-xmpp/cvsroot/cl-xmpp/test/cl-xmpp-test.asd 2006/05/12 17:45:50 1.5 @@ -1,5 +1,5 @@ -;;;; -*- mode: lisp -*- -;;;; $Id: cl-xmpp-test.asd,v 1.4 2005/12/14 19:04:07 eenge Exp $ +;;;; $Id: cl-xmpp-test.asd,v 1.5 2006/05/12 17:45:50 eenge Exp $ ;;;; $Source: /project/cl-xmpp/cvsroot/cl-xmpp/test/cl-xmpp-test.asd,v $ ;;;; See the LICENSE file for licensing information. @@ -16,7 +16,7 @@ :author "Erik Enge" :licence "MIT" :description "Common Lisp XMPP client implementation" - :depends-on (:cl-xmpp :rt) + :depends-on (:cl-xmpp #-sbcl :rt #+sbcl :sb-rt) :components ((:file "package") (:file "utility-test" :depends-on ("package")) @@ -25,5 +25,6 @@ (:file "cl-xmpp-test" :depends-on ("package")))) -(defmethod perform ((operation test-op) (component (eql (find-system 'cl-xmpp-test)))) - (cl-xmpp-test:do-tests)) +(defmethod perform ((operation test-op) + (component (eql (find-system 'cl-xmpp-test)))) + (funcall (intern "DO-TESTS" 'cl-xmpp-test)))