# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1007244252 0
# Node ID e78fbcf9b878dff44e18a4d4a33bc9706de8c815
# Parent  bf8b35f0db41e4ee808de3a164a2617823a6592b
(regexp-opt): Bind completion-regexp-list to nil.

diff -r bf8b35f0db41 -r e78fbcf9b878 lisp/emacs-lisp/regexp-opt.el
--- a/lisp/emacs-lisp/regexp-opt.el	Sat Dec 01 18:20:52 2001 +0000
+++ b/lisp/emacs-lisp/regexp-opt.el	Sat Dec 01 22:04:12 2001 +0000
@@ -102,6 +102,7 @@
     ;; 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))