aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMattias EngdegÄrd2023-09-26 13:33:54 +0200
committerMattias EngdegÄrd2023-09-26 13:33:54 +0200
commit215bfb24dd0de9ba2c82aea330cbb27985ad6eae (patch)
treeefe67cc1452185635624d5683187f2507f44f994
parentd082f46c8cac02c3f871314c458a0bed43ce2ae4 (diff)
downloademacs-215bfb24dd0de9ba2c82aea330cbb27985ad6eae.tar.gz
emacs-215bfb24dd0de9ba2c82aea330cbb27985ad6eae.zip
; checkdoc.el: remove unnecessary regexp groups
* lisp/emacs-lisp/checkdoc.el (checkdoc-message-text-next-string): Remove remains from when the regexp was not written in rx.
-rw-r--r--lisp/emacs-lisp/checkdoc.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el
index cf7b7c318f6..440e133f44b 100644
--- a/lisp/emacs-lisp/checkdoc.el
+++ b/lisp/emacs-lisp/checkdoc.el
@@ -2584,11 +2584,11 @@ Argument END is the maximum bounds to search in."
2584 (rx "(" 2584 (rx "("
2585 (* (syntax whitespace)) 2585 (* (syntax whitespace))
2586 (group 2586 (group
2587 (or (seq (* (group (or wordchar (syntax symbol)))) 2587 (or (seq (* (or wordchar (syntax symbol)))
2588 "error") 2588 "error")
2589 (seq (* (group (or wordchar (syntax symbol)))) 2589 (seq (* (or wordchar (syntax symbol)))
2590 (or "y-or-n-p" "yes-or-no-p") 2590 (or "y-or-n-p" "yes-or-no-p")
2591 (? (group "-with-timeout"))) 2591 (? "-with-timeout"))
2592 "checkdoc-autofix-ask-replace")) 2592 "checkdoc-autofix-ask-replace"))
2593 (+ (any "\n\t "))) 2593 (+ (any "\n\t ")))
2594 end t)) 2594 end t))