; Very minor simplification in bytecomp.el

* lisp/emacs-lisp/bytecomp.el (byte-compile--wide-docstring-p):
Very minor simplification of 'rx' form.

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index bd74c79d717bb2c1eee9fb57a1b5cac6c4bbbaac..e1c7ab4904afc1cb0a40d47d9eeef201b4fbb048 100644 (file)
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -1672,7 +1672,7 @@ URLs."
     ;; known at compile time.  So instead, we assume that these
     ;; substitutions are of some length N.
     (replace-regexp-in-string
-     (rx "\\" (or (seq "[" (* (not "]")) "]")))
+     (rx "\\" (seq "[" (* (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.