mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-05 11:45:45 +00:00
Code Issues Releases Activity

Split windows evenly when 'min-margins' parameter was set (Bug#44483)

Browse Source 
* lisp/window.el (split-window): Make new window inherit any
'min-margins' parameter from WINDOW so that horizontal splits
reliably produce windows of same width (Bug#44483).
This commit is contained in:
Martin Rudalics 2020-11-07 09:20:14 +01:00
parent 0cdd6c9218
commit f4acd7a924
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/window.el
View File

@ -5412,7 +5412,13 @@ frame. The selected window is not changed by this function."
(set-window-parameter (window-parent new) 'window-atom t))
(set-window-parameter new 'window-atom t)))
;; Sanitize sizes unless SIZE was specified.
;; Make the new window inherit the `min-margins' parameter of
;; WINDOW (Bug#44483).
(let ((min-margins (window-parameter window 'min-margins)))
(when min-margins
(set-window-parameter new 'min-margins min-margins)))
;; Sanitize sizes unless SIZE was specified.
(unless size
(window--sanitize-window-sizes horizontal))