awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

feature/popup: ensure popups can get as small as they like

Browse Source 
Popups without modelines can take advantage of the extra lines bought
with a smaller window-min-height.
This commit is contained in:
Henrik Lissner
2018-01-07 05:43:41 -05:00
parent 81453de0c4
commit 1c6d39db7f
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
modules/feature/popup/autoload.el
View File

@ -121,8 +121,9 @@ current buffer."
"Open BUFFER in a popup window. ALIST describes its features."
(let* ((old-window (selected-window))
(alist (+popup--normalize-alist alist))
(new-window (or (display-buffer-reuse-window buffer alist)
(display-buffer-in-side-window buffer alist))))
(new-window (let ((window-min-height 3))
(or (display-buffer-reuse-window buffer alist)
(display-buffer-in-side-window buffer alist)))))
(+popup--init new-window)
(let ((select (+popup-parameter 'select new-window)))
(if (functionp select)