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