From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Sat, 1 Dec 2001 22:04:12 +0000 (+0000)
Subject: (regexp-opt): Bind completion-regexp-list to nil.
X-Git-Tag: ttn-vms-21-2-B4~17962
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=08cf00d8f75359c839ae9811705dfaf297c63225;p=emacs.git

(regexp-opt): Bind completion-regexp-list to nil.
---

diff --git a/lisp/emacs-lisp/regexp-opt.el b/lisp/emacs-lisp/regexp-opt.el
index 06dea3c8433..9e95eeb8fc9 100644
--- a/lisp/emacs-lisp/regexp-opt.el
+++ b/lisp/emacs-lisp/regexp-opt.el
@@ -102,6 +102,7 @@ by \\=\\< and \\>."
     ;; Recurse on the sorted list.
     (let* ((max-lisp-eval-depth (* 1024 1024))
 	   (completion-ignore-case nil)
+	   (completion-regexp-list nil)
 	   (words (eq paren 'words))
 	   (open (cond ((stringp paren) paren) (paren "\\(")))
 	   (sorted-strings (sort (copy-sequence strings) 'string-lessp))