(Electric-pop-up-window): Don't shrink the window if it's already big
enough.
This commit is contained in:
parent
bb07cb70dd
commit
48238d1d45
1 changed files with 3 additions and 1 deletions
|
@ -153,8 +153,10 @@
|
|||
(setq win (selected-window)))
|
||||
(t
|
||||
(switch-to-buffer buf)))
|
||||
(fit-window-to-buffer win max-height)
|
||||
;; Don't shrink the window, but expand it if necessary.
|
||||
(goto-char (point-min))
|
||||
(unless (= (point-max) (window-end win))
|
||||
(fit-window-to-buffer win max-height))
|
||||
win)))
|
||||
|
||||
(provide 'electric)
|
||||
|
|
Loading…
Add table
Reference in a new issue