X-Git-Url: http://git.kpe.io/?p=hyperobject.git;a=blobdiff_plain;f=hyperobject.asd;h=f5f7916d4058264cc12b3adf10735b45a1c3fb84;hp=711cb74a9cfc2cdb199f67d8669d9b9d96e44087;hb=HEAD;hpb=0817a8721cbefca2205dcde535ff6b164033abef

diff --git a/hyperobject.asd b/hyperobject.asd
index 711cb74..f5f7916 100644
--- a/hyperobject.asd
+++ b/hyperobject.asd
@@ -13,15 +13,14 @@
 (defpackage hyperobject-system (:use #:asdf #:cl))
 (in-package :hyperobject-system)
 
-#+(or allegro lispworks sbcl cmu scl openmcl)
-(defsystem hyperobject 
+(defsystem hyperobject
   :name "hyperobject"
   :author "Kevin M. Rosenberg <kevin@rosenberg.net>"
-  :version "2.7.x"
+  :version "2.7.2"
   :maintainer "Kevin M. Rosenberg <kmr@debian.org>"
   :licence "BSD-like License"
-
-  :components 
+  :depends-on (:kmrcl :clsql)
+  :components
   ((:file "package")
    (:file "metaclass" :depends-on ("package"))
    (:file "mop" :depends-on ("metaclass"))
@@ -31,12 +30,12 @@
    (:file "views" :depends-on ("mop"))
    (:file "base-class" :depends-on ("views" "sql" "rules"))
    )
-  :depends-on (:kmrcl :clsql))
-
-#+(or allegro lispworks sbcl cmu scl openmcl)
-(defmethod perform ((o test-op) (c (eql (find-system :hyperobject))))
-  (oos 'load-op 'hyperobject-tests)
-  (oos 'test-op 'hyperobject-tests))
-
-
+  :in-order-to ((test-op (test-op "hyperobject/test"))))
 
+(defsystem hyperobject/test
+    :depends-on (:rt :hyperobject)
+    :components ((:file "tests"))
+    :perform (test-op (o s)
+                      (or (funcall (intern (symbol-name '#:do-tests)
+                                           (find-package '#:regression-test)))
+                          (error "test-op failed"))))