[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] [PATCH] Orgpan: resize the correct window
From: |
Jonas Bernoulli |
Subject: |
[O] [PATCH] Orgpan: resize the correct window |
Date: |
Wed, 3 Oct 2012 15:32:42 +0200 |
is resized to four lines not the document buffer.
TINYCHANGE
---
contrib/lisp/org-panel.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/contrib/lisp/org-panel.el b/contrib/lisp/org-panel.el
index 3ffdfaf..1df3847 100644
--- a/contrib/lisp/org-panel.el
+++ b/contrib/lisp/org-panel.el
@@ -598,12 +598,12 @@ 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 nil '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))
+ (fit-window-to-buffer nil 4 4)
;; The minor mode version starts here:
(when orgpan-minor-mode-version
(select-window orgpan-org-window)
--
1.7.9.5
Message-ID: <address@hidden>
- [O] [PATCH] Orgpan: resize the correct window,
Jonas Bernoulli <=