emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages 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
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
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)