martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

minibuffer.el: De-iconify a *Completions* frame only for eager display

Browse Source 
* lisp/minibuffer.el (completions--after-change)
(minibuffer--completions-visible): Don't consider an iconified
frame as visible.
This commit is contained in:
Stefan Monnier
2026-03-24 15:54:49 -04:00
parent ebd982db33
commit 617b254fe3
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/minibuffer.el
View File

@@ -2807,7 +2807,7 @@ has been requested by the completion table."
"Update displayed *Completions* buffer after change in buffer contents." "Update displayed *Completions* buffer after change in buffer contents."
(if (not (or (minibufferp nil t) completion-in-region-mode)) (if (not (or (minibufferp nil t) completion-in-region-mode))
(remove-hook 'after-change-functions #'completions--after-change t) (remove-hook 'after-change-functions #'completions--after-change t)
(when-let* ((window (get-buffer-window "*Completions*" 0))) (when-let* ((window (get-buffer-window "*Completions*" 'visible)))
(when completion-auto-deselect (when completion-auto-deselect
(with-selected-window window (with-selected-window window
(completions--deselect)))) (completions--deselect))))
@@ -3480,7 +3480,7 @@ in the minibuffer window."
(defun minibuffer--completions-visible () (defun minibuffer--completions-visible ()
"Return the window where the current *Completions* buffer is visible, if any." "Return the window where the current *Completions* buffer is visible, if any."
(when-let* ((window (get-buffer-window "*Completions*" 0))) (when-let* ((window (get-buffer-window "*Completions*" 'visible)))
(let ((reference-buffer (let ((reference-buffer
(buffer-local-value 'completion-reference-buffer (buffer-local-value 'completion-reference-buffer
(window-buffer window)))) (window-buffer window))))