diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2021-02-19 13:44:25 +0100 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2021-02-19 13:44:25 +0100 |
| commit | d4f6927d48043d01929a93da53a64b1e4296f994 (patch) | |
| tree | 535b1be09cf9cba2d1e29ecfcb77030ff022a3f1 /test/lisp/emacs-lisp | |
| parent | ea2f5f3fdac0b360833586ac855248094baf328c (diff) | |
| download | emacs-d4f6927d48043d01929a93da53a64b1e4296f994.tar.gz emacs-d4f6927d48043d01929a93da53a64b1e4296f994.tar.bz2 emacs-d4f6927d48043d01929a93da53a64b1e4296f994.zip | |
Fix regexp mistakes
* lisp/progmodes/cperl-mode.el (cperl--package-regexp):
Avoid double repetition; cperl--ws-or-comment-regexp is already
repeated with 1+.
* test/lisp/textmodes/dns-mode-tests.el
(dns-mode-tests-dns-mode-soa-increment-serial): Escape literal '$'.
* test/lisp/emacs-lisp/rx-tests.el (rx-regexp): Modify test to not
trigger a linting warning while retaining its testing power.
Diffstat (limited to 'test/lisp/emacs-lisp')
| -rw-r--r-- | test/lisp/emacs-lisp/rx-tests.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/lisp/emacs-lisp/rx-tests.el b/test/lisp/emacs-lisp/rx-tests.el index 388c5e86b4c..12bf4f7978e 100644 --- a/test/lisp/emacs-lisp/rx-tests.el +++ b/test/lisp/emacs-lisp/rx-tests.el @@ -388,11 +388,11 @@ (ert-deftest rx-regexp () (should (equal (rx (regexp "abc") (regex "[de]")) "\\(?:abc\\)[de]")) + (should (equal (rx "a" (regexp "$")) + "a\\(?:$\\)")) (let ((x "a*")) (should (equal (rx (regexp x) "b") "\\(?:a*\\)b")) - (should (equal (rx "a" (regexp "*")) - "a\\(?:*\\)")) (should (equal (rx "" (regexp x) (eval "")) "a*")))) |