org-src: New option for `org-src-window-setup'.

org-src.el: (org-src-window-setup) support open edit src window below.

TINYCHANGE

etc/ORG-NEWS

@@ -277,6 +277,10 @@ of these exporters will properly export to =irc:= links, which will
 open properly in irc clients from web browsers.
 
 *** ~org-comment-dwim~ (bound to =M-;=) now comments headings, if point is on a heading
+*** Add support for open source block in window below
+
+Set option ~org-src-window-setup~ to ~split-window-below~.
+
 *** Alphabetic sorting in headings and tags now uses the locale’s sorting rules
 
 When sorting alphabetically, ~org-sort-entries~ and

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