masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-15 16:32:14 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix a typo in the doc string of 'regex-opt'

Browse source 
* lisp/emacs-lisp/regexp-opt.el (regexp-opt): Fix example in
the doc string.  (Bug#34596)
This commit is contained in:
Eli Zaretskii 2019-02-22 10:12:14 +02:00
parent d9905d5c6f
commit 3707ea434f
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/emacs-lisp/regexp-opt.el
View file

@ -121,9 +121,9 @@ than that of a simplified version:
((eq paren \\='symbols) \\='(\"\\\\_<\\\\(\" . \"\\\\)\\\\_>\")) ((eq paren \\='symbols) \\='(\"\\\\_<\\\\(\" . \"\\\\)\\\\_>\"))
((null paren) \\='(\"\\\\(?:\" . \"\\\\)\")) ((null paren) \\='(\"\\\\(?:\" . \"\\\\)\"))
(t \\='(\"\\\\(\" . \"\\\\)\"))))) (t \\='(\"\\\\(\" . \"\\\\)\")))))
(concat (car paren) (concat (car parens)
(mapconcat \\='regexp-quote strings \"\\\\|\") (mapconcat \\='regexp-quote strings \"\\\\|\")
(cdr paren))))" (cdr parens))))"
(save-match-data (save-match-data
;; Recurse on the sorted list. ;; Recurse on the sorted list.
(let* ((max-lisp-eval-depth 10000) (let* ((max-lisp-eval-depth 10000)