r8176: changes for macosx, documentation fixes

[clsql.git] / clsql-tests.asd

diff --git a/clsql-tests.asd b/clsql-tests.asd
index 7e12fb2409f386c129ee3391b9cd840f1faeef48..a9c8729ff060a4b951fabcbe4c382b47b89464ee 100644 (file)
--- a/clsql-tests.asd
+++ b/clsql-tests.asd
@@ -33,7 +33,7 @@
            )))
 
 (defmethod perform ((o test-op) (c (eql (find-system 'clsql-tests))))
-  (or (funcall (intern (symbol-name '#:do-tests)
-                      (find-package '#:regression-test)))
-      (error "test-op failed")))
+  (unless (funcall (intern (symbol-name '#:run-tests)
+                          (find-package '#:clsql-tests)))
+    (error "test-op failed")))