1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-05 20:43:08 +00:00

(lazy-completion-table): Don't be fooled if the var holds

a "list" (lambda ...) rather than a real completion list.
This commit is contained in:
Stefan Monnier 2005-12-19 02:20:33 +00:00
parent 61f03d6f8f
commit 8e77fbb49f
2 changed files with 12 additions and 4 deletions

View File

@ -1,6 +1,14 @@
2005-12-18 Stefan Monnier <monnier@iro.umontreal.ca>
* subr.el (lazy-completion-table): Don't be fooled if the var holds
a "list" (lambda ...) rather than a real completion list.
* emacs-lisp/cl-extra.el (cl-macroexpand-all): Fix code-walk for
lexical-let when encountering ((lambda (...) ...) ...).
2005-12-17 Chong Yidong <cyd@stupidchicken.com>
* progmodes/sh-script.el (sh-mode):
* progmodes/sh-script.el (sh-mode):
* language/ethio-util.el (ethio-fidel-to-sera-mail-or-marker):
* textmodes/picture.el (picture-mode): Update docstrings.
@ -15,8 +23,8 @@
2005-12-17 Chong Yidong <cyd@stupidchicken.com>
* emacs-lisp/edebug.el (edebug-safe-prin1-to-string): Capture
error from printing circular structures.
* emacs-lisp/edebug.el (edebug-safe-prin1-to-string):
Capture error from printing circular structures.
2005-12-17 Martin Rudalics <rudalics@gmx.at> (tiny change)

View File

@ -2268,7 +2268,7 @@ from which the minibuffer was entered. The return value of
(let ((str (make-symbol "string")))
`(dynamic-completion-table
(lambda (,str)
(unless (listp ,var)
(when (functionp ,var)
(setq ,var (,fun ,@args)))
,var))))