From: Eli Zaretskii <eliz@gnu.org>
Date: Fri, 22 Feb 2019 08:12:14 +0000 (+0200)
Subject: Fix a typo in the doc string of 'regex-opt'
X-Git-Tag: emacs-26.2~58
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3707ea434f1801f911e51896b987be61b4e4c7c2;p=emacs.git

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

* lisp/emacs-lisp/regexp-opt.el (regexp-opt): Fix example in
the doc string.  (Bug#34596)
---

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