diff options
author | Martin Rudalics <rudalics@gmx.at> | 2014-07-29 17:08:30 +0200 |
---|---|---|
committer | Martin Rudalics <rudalics@gmx.at> | 2014-07-29 17:08:30 +0200 |
commit | ca74eaca07e52cabd7fd14fdd9e73aa502b2d210 (patch) | |
tree | 1ba5c5315c0da3b5f083937e7a7c51ac93c9290f /lisp/window.el | |
parent | 6bca885a20f83220f93ad0d96af74fb84ab087d7 (diff) | |
download | emacs-ca74eaca07e52cabd7fd14fdd9e73aa502b2d210.tar.gz |
In window--state-put-2 handle horizontal scroll bars.
* window.el (window--state-put-2): Handle horizontal scroll
bars, if present.
Diffstat (limited to 'lisp/window.el')
-rw-r--r-- | lisp/window.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/window.el b/lisp/window.el index f55f0657a30..28a2be00af9 100644 --- a/lisp/window.el +++ b/lisp/window.el @@ -5121,7 +5121,7 @@ value can be also stored on disk and read back in a new session." (let ((scroll-bars (cdr (assq 'scroll-bars state)))) (set-window-scroll-bars window (car scroll-bars) (nth 2 scroll-bars) - (nth 3 scroll-bars))) + (or (nth 3 scroll-bars) 0) (nth 5 scroll-bars))) (set-window-vscroll window (cdr (assq 'vscroll state))) ;; Adjust vertically. (if (memq window-size-fixed '(t height)) |