From 04ee1c23fdcca643cbaaa15574551cbe54d006a3 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Fri, 29 Jun 2018 02:35:33 +0200 Subject: [PATCH] Don't set margins in left/right popups --- modules/ui/popup/autoload/popup.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/modules/ui/popup/autoload/popup.el b/modules/ui/popup/autoload/popup.el index 417a5cba2..8fb42f5a6 100644 --- a/modules/ui/popup/autoload/popup.el +++ b/modules/ui/popup/autoload/popup.el @@ -207,8 +207,9 @@ disabled." "Creates padding for the popup window determined by `+popup-margin-width', restoring it if `+popup-buffer-mode' is disabled." (when +popup-margin-width - (let ((m (if (bound-and-true-p +popup-buffer-mode) +popup-margin-width))) - (set-window-margins nil m m)))) + (unless (memq (window-parameter nil 'window-side) '(left right)) + (let ((m (if (bound-and-true-p +popup-buffer-mode) +popup-margin-width))) + (set-window-margins nil m m))))) ;;;###autoload (defun +popup|set-modeline-on-enable ()