diff options
author | Bastien Guerry <bzg@altern.org> | 2014-04-20 08:00:19 +0200 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2014-04-20 08:00:19 +0200 |
commit | 9272ef3e17278d1d46f56cda3459ce9d17dcc87d (patch) | |
tree | 6199f9d0ce1d4a8d9d3e564e88f8811b261ad69f | |
parent | aff6a10aac5ebb0bec50187fd4039424c23ead82 (diff) | |
download | org-mode-9272ef3e17278d1d46f56cda3459ce9d17dcc87d.tar.gz |
Revert "org.el (org-refile): Allow org-refile goto from everywhere"
This reverts commit faa1703b8f9c2bc2d1b9317c29fde75b764f41fc.
-rw-r--r-- | lisp/org.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org.el b/lisp/org.el index 1f9b194..3d7fcfa 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -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"))) |