From: Olof-Joachim Frahm <olof@macrolet.net>
Date: Mon, 3 Dec 2012 20:53:07 +0000 (+0100)
Subject: Simpler suites list.
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=939c939b80c78b3eab84d22349a22545de89d6e3;p=fiveam.git

Simpler suites list.
---

diff --git a/src/suite.lisp b/src/suite.lisp
index b3b321d..1a264f3 100644
--- a/src/suite.lisp
+++ b/src/suite.lisp
@@ -74,8 +74,8 @@ Overrides any existing suite named NAME."
     suite))
 
 (defun list-all-suites ()
-  (loop for suite being the hash-value in *suites*
-        collect suite))
+  "Returns an unordered LIST of all suites."
+  (hash-table-values *suites*))
 
 ;;;; ** Managing the Current Suite