From a760cbae6935a7ff64591cc6a90c27a877290d5d Mon Sep 17 00:00:00 2001 From: Olof-Joachim Frahm Date: Wed, 3 Apr 2013 23:13:59 +0200 Subject: [PATCH] Typo. --- src/suite.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/suite.lisp b/src/suite.lisp index a74f7ed..b3b321d 100644 --- a/src/suite.lisp +++ b/src/suite.lisp @@ -48,7 +48,7 @@ will overrwrite any existing suite named `NAME`." (defun remove-from-suites (test-name) (when (get-test test-name) - ;; if this suite alruady exists, and its :IN some other suite, remove it. + ;; if this suite already exists, and it's :IN some other suite, remove it. (dolist (s (list-all-suites)) (when (gethash test-name (tests s)) (remhash test-name (tests s)))))) -- 1.7.10.4