From 486ab031347afe79021dd0b56138f05e4cad7108 Mon Sep 17 00:00:00 2001 From: Olof-Joachim Frahm Date: Mon, 3 Dec 2012 21:53:07 +0100 Subject: [PATCH] Simpler suites list. --- src/suite.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/suite.lisp b/src/suite.lisp index 59fe844..88bb34b 100644 --- a/src/suite.lisp +++ b/src/suite.lisp @@ -81,8 +81,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 -- 1.7.10.4