forked from mirrors/org-mode
Revert "org.el (org-refile): Allow org-refile goto from everywhere"
This reverts commit faa1703b8f
.
This commit is contained in:
parent
aff6a10aac
commit
9272ef3e17
|
@ -11569,13 +11569,13 @@ prefix argument (`C-u C-u C-u C-c C-w')."
|
|||
(setq it (or rfloc
|
||||
(let (heading-text)
|
||||
(save-excursion
|
||||
(unless (or goto (listp goto))
|
||||
(unless (and goto (listp goto))
|
||||
(org-back-to-heading t)
|
||||
(setq heading-text
|
||||
(nth 4 (org-heading-components))))
|
||||
|
||||
(org-refile-get-location
|
||||
(cond ((or goto (listp goto)) "Goto")
|
||||
(cond ((and goto (listp goto)) "Goto")
|
||||
(regionp (concat actionmsg " region to"))
|
||||
(t (concat actionmsg " subtree \""
|
||||
heading-text "\" to")))
|
||||
|
|
Loading…
Reference in New Issue