Obsolete call to get-tagged-tests in run-tags.
authorThomas M. Hermann <thomas.m.hermann@odonata-research.com>
Tue, 16 Oct 2012 03:40:58 +0000 (15 22:40 -0500)
committerThomas M. Hermann <thomas.m.hermann@odonata-research.com>
Tue, 16 Oct 2012 03:40:58 +0000 (15 22:40 -0500)
lisp-unit.lisp

index 8aa831e..4f6528c 100644 (file)
@@ -585,7 +585,7 @@ assertion.")
 
 (defun run-tags (tags &optional (package *package*))
   "Run the tests associated with the specified tags in package."
-  (%run-thunks (get-tagged-tests tags package) package))
+  (%run-thunks (tagged-tests tags package) package))
 
 ;;; Useful equality predicates for tests