updated for lisp-unit2

AccelerationNet · Jan 1, 2014 · aa54a45 · aa54a45
1 parent 7581086
commit aa54a45
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/collectors.asd b/collectors.asd
@@ -28,8 +28,10 @@
 (defmethod asdf:perform ((o asdf:test-op) (c (eql (find-system :collectors))))
   (asdf:load-system :collectors-test)
   (let ((*package* (find-package :collectors-test)))
-    (eval (read-from-string "(with-summary (:name :collectors)
-                                (run-tests :package :collectors-test))"))))
+    (eval (read-from-string "
+      (run-tests :package :collectors-test
+                 :name :collectors
+                 :run-contexts #'with-summary-context)"))))
 
 ;; Copyright (c) 2002-2006, Edward Marco Baringer (from arnesi lib)
 ;;               2011 Russ Tyndall , Acceleration.net http://www.acceleration.net