From: Olof-Joachim Frahm <olof@macrolet.net>
Date: Mon, 3 Dec 2012 20:37:13 +0000 (+0100)
Subject: Typo.
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=71548856f46f8a0c5b171d3ee37c1e2d7b070686;p=fiveam.git

Typo.
---

diff --git a/src/suite.lisp b/src/suite.lisp
index 1fbd70a..345a090 100644
--- a/src/suite.lisp
+++ b/src/suite.lisp
@@ -53,7 +53,7 @@ def-test) to pass to tests in this suite."
 
 (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 its :IN some other suite, remove it.
     (dolist (s (list-all-suites))
       (when (gethash test-name (tests s))
         (remhash test-name (tests s))))))