]> git.eshelyaron.com Git - emacs.git/commitdiff
; checkdoc.el: remove unnecessary regexp groups
authorMattias Engdegård <mattiase@acm.org>
Tue, 26 Sep 2023 11:33:54 +0000 (13:33 +0200)
committerMattias Engdegård <mattiase@acm.org>
Tue, 26 Sep 2023 11:33:54 +0000 (13:33 +0200)
* 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

index cf7b7c318f68d029803ce09ce3aa93162b88ae1e..440e133f44ba801fcf90876595876e2f63d0627e 100644 (file)
@@ -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))