Don't set margins in left/right popups
This commit is contained in:
parent
f987c121d4
commit
04ee1c23fd
1 changed files with 3 additions and 2 deletions
|
@ -207,8 +207,9 @@ disabled."
|
||||||
"Creates padding for the popup window determined by `+popup-margin-width',
|
"Creates padding for the popup window determined by `+popup-margin-width',
|
||||||
restoring it if `+popup-buffer-mode' is disabled."
|
restoring it if `+popup-buffer-mode' is disabled."
|
||||||
(when +popup-margin-width
|
(when +popup-margin-width
|
||||||
(let ((m (if (bound-and-true-p +popup-buffer-mode) +popup-margin-width)))
|
(unless (memq (window-parameter nil 'window-side) '(left right))
|
||||||
(set-window-margins nil m m))))
|
(let ((m (if (bound-and-true-p +popup-buffer-mode) +popup-margin-width)))
|
||||||
|
(set-window-margins nil m m)))))
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +popup|set-modeline-on-enable ()
|
(defun +popup|set-modeline-on-enable ()
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue