tec/org-mode
tec/org-mode
1
0
Fork 0
forked from mirrors/org-mode
Code Pull requests Releases Activity

Merge branch 'maint'

Browse source
This commit is contained in:
Bastien Guerry 2013-11-06 16:26:49 +01:00
parent 39d22406e4 47b0eec8dc
commit 41755e24ed
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/org-capture.el
View file

@ -789,14 +789,14 @@ already gone. Any prefix argument will be passed to the refile command."
(let ((pos (point)) (let ((pos (point))
(base (buffer-base-buffer (current-buffer))) (base (buffer-base-buffer (current-buffer)))
(org-refile-for-capture t)) (org-refile-for-capture t))
(org-capture-finalize)
(save-window-excursion (save-window-excursion
(with-current-buffer (or base (current-buffer)) (with-current-buffer (or base (current-buffer))
(save-excursion (save-excursion
(save-restriction (save-restriction
(widen) (widen)
(goto-char pos) (goto-char pos)
(call-interactively 'org-refile))))))) (call-interactively 'org-refile)))))
(org-capture-finalize)))
(defun org-capture-kill () (defun org-capture-kill ()
"Abort the current capture process." "Abort the current capture process."