mirrors
/
org-mode
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git
0
0
Fork 1
Code Releases Activity

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

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

TINYCHANGE
This commit is contained in:
stardiviner 2018-03-13 01:23:52 +08:00 committed by Nicolas Goaziou
parent bd0b691716
commit 00938bc98b
2 changed files with 18 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
etc/ORG-NEWS
View File

@ -277,6 +277,10 @@ of these exporters will properly export to =irc:= links, which will
open properly in irc clients from web browsers. open properly in irc clients from web browsers.
*** ~org-comment-dwim~ (bound to =M-;=) now comments headings, if point is on a heading *** ~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 *** Alphabetic sorting in headings and tags now uses the locale’s sorting rules
When sorting alphabetically, ~org-sort-entries~ and When sorting alphabetically, ~org-sort-entries~ and

6
lisp/org-src.el
View File

@ -155,6 +155,8 @@ Possible values for this option are:
current-window Show edit buffer in the current window, keeping all other current-window Show edit buffer in the current window, keeping all other
windows. 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. other-window Use `switch-to-buffer-other-window' to display edit buffer.
reorganize-frame Show only two windows on the current frame, the current reorganize-frame Show only two windows on the current frame, the current
window and the edit buffer. When exiting the edit buffer, 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 :group 'org-edit-structure
:type '(choice :type '(choice
(const current-window) (const current-window)
(const split-window-below)
(const other-frame) (const other-frame)
(const other-window) (const other-window)
(const reorganize-frame))) (const reorganize-frame)))
@ -746,6 +749,9 @@ If BUFFER is non-nil, test it instead."
(`current-window (pop-to-buffer-same-window buffer)) (`current-window (pop-to-buffer-same-window buffer))
(`other-window (`other-window
(switch-to-buffer-other-window buffer)) (switch-to-buffer-other-window buffer))
(`split-window-below
(select-window (split-window-vertically))
(pop-to-buffer-same-window buffer))
(`other-frame (`other-frame
(pcase context (pcase context
(`exit (`exit