* lunit.el (lunit-make-test-suite-from-class): Fix regexp.
[elisp/flim.git] / lunit.el
index 10c8707..dbe1f74 100644 (file)
--- a/lunit.el
+++ b/lunit.el
@@ -265,7 +265,7 @@ TESTS holds a number of instances of `lunit-test'."
     (mapatoms
      (lambda (symbol)
        (if (and (fboundp symbol)
-               (string-match "^test-" (symbol-name symbol))
+               (string-match "^test" (symbol-name symbol))
                (null (get symbol 'luna-method-qualifier)))
           (push (lunit-make-test-case class symbol) tests)))
      (luna-class-obarray (luna-find-class class)))