org-src: Fix `org-edit-src-exit' with `split-window-below'

* lisp/org-src.el: (org-src-switch-to-buffer): Delete window when exiting source buffer instead of splitting it again.
2019-01-22 17:03:04 +00:00 · 2019-01-22 17:03:04 +00:00 · 465255f82f
parent 3fc7b0639d
commit 465255f82f
1 changed files with 3 additions and 1 deletions
--- a/lisp/org-src.el
+++ b/lisp/org-src.el
@ -789,7 +789,9 @@ Raise an error when current buffer is not a source editing buffer."
    (`other-window
     (switch-to-buffer-other-window buffer))
    (`split-window-below
-     (select-window (split-window-vertically))
+     (if (eq context 'exit)
+	 (delete-window)
+       (select-window (split-window-vertically)))
     (pop-to-buffer-same-window buffer))
    (`other-frame
     (pcase context