From 1c6d39db7f4f26c9097e37852a2d23c9e62081a4 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sun, 7 Jan 2018 05:43:41 -0500 Subject: [PATCH] feature/popup: ensure popups can get as small as they like Popups without modelines can take advantage of the extra lines bought with a smaller window-min-height. --- modules/feature/popup/autoload.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/modules/feature/popup/autoload.el b/modules/feature/popup/autoload.el index 370248270..367fbdc91 100644 --- a/modules/feature/popup/autoload.el +++ b/modules/feature/popup/autoload.el @@ -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)