Don’t (require 'cl)

* test/src/regex-test.el: Don’t (require 'cl).
(regex-tests-PCRE): s/loop/cl-loop/

1 files changed, 3 insertions, 4 deletions

diff --git a/test/src/regex-tests.el b/test/src/regex-tests.el
index 1407441965a..97b9633bada 100644
--- a/test/src/regex-tests.el
+++ b/test/src/regex-tests.el
@@ -20,7 +20,6 @@
 ;;; Code:
 
 (require 'ert)
-(require 'cl)
 
 (ert-deftest regex-word-cc-fallback-test ()
   "Test that ‘[[:cc:]]*x’ matches ‘x’ (bug#24020).
@@ -516,9 +515,9 @@ differences in behavior.")
                  ('invalid-regexp 'compilation-failed))
 
                matches-observed
-               (loop for x from 0 to 20
-                     collect (and (not what-failed)
-                                  (or (match-string x string) "<unset>")))))
+               (cl-loop for x from 0 to 20
+                        collect (and (not what-failed)
+                                     (or (match-string x string) "<unset>")))))
        nil)
 
       ;; verification line: failed match