Don't set margins in left/right popups

This commit is contained in:
Henrik Lissner 2018-06-29 02:35:33 +02:00
parent f987c121d4
commit 04ee1c23fd
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -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
(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))))
(set-window-margins nil m m)))))
;;;###autoload
(defun +popup|set-modeline-on-enable ()