From 215bfb24dd0de9ba2c82aea330cbb27985ad6eae Mon Sep 17 00:00:00 2001 From: =?utf8?q?Mattias=20Engdeg=C3=A5rd?= Date: Tue, 26 Sep 2023 13:33:54 +0200 Subject: [PATCH] ; 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. --- lisp/emacs-lisp/checkdoc.el | 6 +++--- 1 file 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." (rx "(" (* (syntax whitespace)) (group - (or (seq (* (group (or wordchar (syntax symbol)))) + (or (seq (* (or wordchar (syntax symbol))) "error") - (seq (* (group (or wordchar (syntax symbol)))) + (seq (* (or wordchar (syntax symbol))) (or "y-or-n-p" "yes-or-no-p") - (? (group "-with-timeout"))) + (? "-with-timeout")) "checkdoc-autofix-ask-replace")) (+ (any "\n\t "))) end t)) -- 2.39.2