master a59e35d: ; Further minor simplification of rx form in bytecomp.el

[Stefan Kangas]

branch: master
commit a59e35d79fae989d1047b23ddabc6f2c5bbe0097
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    ; Further minor simplification of rx form in bytecomp.el
    
    * lisp/emacs-lisp/bytecomp.el (byte-compile--wide-docstring-p):
    Simplify even more.  Thanks to Mattias Engdegård <mattiase@acm.org>.
---
 lisp/emacs-lisp/bytecomp.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 5dc03ea..566a3fd 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -1672,12 +1672,12 @@ URLs."
     ;; known at compile time.  So instead, we assume that these
     ;; substitutions are of some length N.
     (replace-regexp-in-string
-     (rx "\\" (seq "[" (* (not "]")) "]"))
+     (rx "\\[" (* (not "]")) "]")
      (make-string byte-compile--wide-docstring-substitution-len ?x)
      ;; For literal key sequence substitutions (e.g. "\\`C-h'"), just
      ;; remove the markup as `substitute-command-keys' would.
      (replace-regexp-in-string
-      (rx "\\" (seq "`" (group (* (not "'"))) "'"))
+      (rx "\\`" (group (* (not "'"))) "'")
       "\\1"
       docstring)))))