|
From: | Stefan Monnier |
Subject: | bug#65459: completing-read INITIAL-VALUE unaware of COLLECTION and REQUIRE-MATCH |
Date: | Wed, 23 Aug 2023 22:30:36 -0400 |
User-agent: | Gnus/5.13 (Gnus v5.13) |
> (defun my-completing-read (prompt collection start) > (minibuffer-with-setup-hook > (:append > (lambda () > (setq-local actual-minibuffer-default-add-function > minibuffer-default-add-function) > (setq-local minibuffer-default-add-function > '(lambda () (setq minibuffer-default-add-done nil) > (funcall actual-minibuffer-default-add-function))) Why use ' on `lambda`? BTW, rather than the above two `setq-local`s, I think you can write: (add-function :before (local 'minibuffer-default-add-function) (lambda () (setq minibuffer-default-add-done nil))) -- Stefan
[Prev in Thread] | Current Thread | [Next in Thread] |