Fix typo

diff --git a/src/suite.lisp b/src/suite.lisp
index 03e232e..003f873 100644 (file)
--- a/src/suite.lisp
+++ b/src/suite.lisp
@@ -54,7 +54,7 @@ Overrides any existing suite named NAME."
 
 (defun list-all-suites ()
   "Returns an unordered LIST of all suites."
-  (hash-table-values *suites*))
+  (hash-table-values *suite*))
 
 ;;;; ** Managing the Current Suite