all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
* [PATCH] org-src-edit support open edit buffer bellow current window
@ 2018-03-12 17:27 stardiviner
  2018-03-13  8:22 ` Nicolas Goaziou
  0 siblings, 1 reply; 7+ messages in thread
From: stardiviner @ 2018-03-12 17:27 UTC (permalink / raw)
  To: org-mode


[-- Attachment #1.1: Type: text/plain, Size: 42 bytes --]

Add a more better way to open src block.


[-- Attachment #1.2: Type: text/html, Size: 353 bytes --]

[-- Attachment #2: 0001-org-src.el-org-edit-src-support-open-edit-src-window.patch --]
[-- Type: text/x-patch, Size: 1578 bytes --]

From d0db82e0b3f7e6ff0102b4b08ba18de883da32e2 Mon Sep 17 00:00:00 2001
From: stardiviner <numbchild@gmail.com>
Date: Tue, 13 Mar 2018 01:23:52 +0800
Subject: [PATCH] org-src.el: (org-edit-src) support open edit src window
 below.

---
 lisp/org-src.el | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/lisp/org-src.el b/lisp/org-src.el
index dfa2ae3de..5d3c2e538 100644
--- a/lisp/org-src.el
+++ b/lisp/org-src.el
@@ -155,6 +155,8 @@ Possible values for this option are:
 
 current-window    Show edit buffer in the current window, keeping all other
                   windows.
+split-window-below Show edit buffer below the current window, keeping all
+                   other windows.
 other-window      Use `switch-to-buffer-other-window' to display edit buffer.
 reorganize-frame  Show only two windows on the current frame, the current
                   window and the edit buffer.  When exiting the edit buffer,
@@ -164,6 +166,7 @@ other-frame       Use `switch-to-buffer-other-frame' to display edit buffer.
   :group 'org-edit-structure
   :type '(choice
 	  (const current-window)
+	  (const split-window-below)
 	  (const other-frame)
 	  (const other-window)
 	  (const reorganize-frame)))
@@ -746,6 +749,9 @@ If BUFFER is non-nil, test it instead."
     (`current-window (pop-to-buffer-same-window buffer))
     (`other-window
      (switch-to-buffer-other-window buffer))
+    (`split-window-below
+     (select-window (split-window-vertically))
+     (pop-to-buffer-same-window buffer))
     (`other-frame
      (pcase context
        (`exit
-- 
2.16.2


^ permalink raw reply related	[flat|nested] 7+ messages in thread

end of thread, other threads:[~2018-03-17  7:12 UTC | newest]

Thread overview: 7+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2018-03-12 17:27 [PATCH] org-src-edit support open edit buffer bellow current window stardiviner
2018-03-13  8:22 ` Nicolas Goaziou
2018-03-13 10:19   ` stardiviner
2018-03-16  7:27     ` stardiviner
2018-03-16 21:47       ` Nicolas Goaziou
2018-03-17  4:26         ` stardiviner
2018-03-17  7:11           ` Nicolas Goaziou

Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.