1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-16 09:50:25 +00:00

Don’t (require 'cl)

* test/src/regex-test.el: Don’t (require 'cl).
(regex-tests-PCRE): s/loop/cl-loop/
This commit is contained in:
Michal Nazarewicz 2016-07-27 18:38:41 +02:00
parent 82a487d522
commit 7496844e7d

View File

@ -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