Orgpan: resize the correct window

* contrib/lisp/org-panel.el (orgpan-panel): Make sure the panel buffer
  is resized to four lines not the document buffer.

TINYCHANGE
This commit is contained in:
Jonas Bernoulli 2012-10-27 22:07:12 +02:00 committed by Bastien Guerry
parent 43f7659664
commit 650748ae43
1 changed files with 3 additions and 4 deletions

View File

@ -598,12 +598,11 @@ button changes the binding of the arrow keys."
org-mode-map))
;;(org-back-to-heading)
;;(remove-hook 'window-configuration-change-hook 'orgpan-window-config-change)
(split-window)
(setq orgpan-org-window (selected-window))
(setq orgpan-panel-window (split-window nil -4 'below))
(select-window orgpan-panel-window)
(set-window-buffer (selected-window) (orgpan-make-panel-buffer))
(setq orgpan-panel-window (selected-window))
;;(set-window-dedicated-p (selected-window) t)
(fit-window-to-buffer nil nil 3)
(setq orgpan-org-window (next-window))
;; The minor mode version starts here:
(when orgpan-minor-mode-version
(select-window orgpan-org-window)