mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-20 10:23:57 +00:00
Code Issues Releases Activity

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

Browse Source
This commit is contained in:
Stefan Monnier 2001-12-01 22:04:12 +00:00
parent f1259a53b0
commit 08cf00d8f7
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lisp/emacs-lisp/regexp-opt.el
View File

@ -102,6 +102,7 @@ by \\=\\< and \\>."
;; Recurse on the sorted list. ;; Recurse on the sorted list.
(let* ((max-lisp-eval-depth (* 1024 1024)) (let* ((max-lisp-eval-depth (* 1024 1024))
(completion-ignore-case nil) (completion-ignore-case nil)
(completion-regexp-list nil)
(words (eq paren 'words)) (words (eq paren 'words))
(open (cond ((stringp paren) paren) (paren "\\("))) (open (cond ((stringp paren) paren) (paren "\\(")))
(sorted-strings (sort (copy-sequence strings) 'string-lessp)) (sorted-strings (sort (copy-sequence strings) 'string-lessp))