Commit 7496844e authored by Michal Nazarewicz's avatar Michal Nazarewicz
Browse files

Don’t (require 'cl)

* test/src/regex-test.el: Don’t (require 'cl).
(regex-tests-PCRE): s/loop/cl-loop/
parent 82a487d5
......@@ -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
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment