mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-30 15:07:48 +00:00
Code Releases Activity

Merge branch 'maint'

Browse source
This commit is contained in:
Bastien Guerry 2014-04-17 09:18:19 +02:00
parent 1a910df1c0 c3810f71b6
commit 06bbbee67a
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/org.el
View file

@ -12039,8 +12039,9 @@ blocks in the buffer."
This means to empty the block, parse for parameters and then call
the correct writing function."
(interactive)
(save-window-excursion
(let* ((pos (point))
(save-excursion
(let* ((win (selected-window))
(pos (point))
(line (org-current-line))
(params (org-prepare-dblock))
(name (plist-get params :name))
@ -12053,6 +12054,7 @@ the correct writing function."
(when (and indent (> indent 0))
(setq indent (make-string indent ?\ ))
(save-excursion
(select-window win)
(org-beginning-of-dblock)
(forward-line 1)
(while (not (looking-at org-dblock-end-re))