Fix test-test-suite-with-no-tests (correct the name it uses).

darcs-hash:20081026164037-3cc5d-133f700a30bf2978aad167bc7e24070dacf9b6ee.gz
hraban · Oct 26, 2008 · 6b8ecdd · 6b8ecdd
1 parent 8593e88
commit 6b8ecdd
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/test/lift-test.lisp b/test/lift-test.lisp
@@ -770,7 +770,7 @@ See file COPYING for license
 
 ;;;;;
 
-(deftestsuite test-suite-with-no-tests ()
+(deftestsuite test-suite-with-no-tests-helper ()
   ())
 
 (deftestsuite test-test-suite-with-no-tests (lift-test)
@@ -779,5 +779,5 @@ See file COPYING for license
 
 (addtest (test-test-suite-with-no-tests)
   test-1
-  (let ((r (run-tests :suite 'no-tests)))
+  (let ((r (run-tests :suite 'test-suite-with-no-tests-helper)))
     (ensure-same (length (tests-run r)) 0)))