diff options
| author | Stefan Kangas <stefan@marxist.se> | 2021-11-22 11:55:24 +0100 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2021-11-22 12:04:19 +0100 |
| commit | d1a2e78b8cab54c0d6d0f3c208b24f59545ffbb3 (patch) | |
| tree | da68cdd5864ad832bb6c8fd22224d96c1159c268 /lisp/emacs-lisp/bytecomp.el | |
| parent | 4a3ba8528bc8b8f083251cbebe46e5978e9ec816 (diff) | |
| download | emacs-d1a2e78b8cab54c0d6d0f3c208b24f59545ffbb3.tar.gz emacs-d1a2e78b8cab54c0d6d0f3c208b24f59545ffbb3.tar.bz2 emacs-d1a2e78b8cab54c0d6d0f3c208b24f59545ffbb3.zip | |
; Very minor simplification in bytecomp.el
* lisp/emacs-lisp/bytecomp.el (byte-compile--wide-docstring-p):
Very minor simplification of 'rx' form.
Diffstat (limited to 'lisp/emacs-lisp/bytecomp.el')
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index bd74c79d717..e1c7ab4904a 100644 --- 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. |