Browse Source

Revert "org.el (org-refile): Allow org-refile goto from everywhere"

This reverts commit faa1703b8f9c2bc2d1b9317c29fde75b764f41fc.
Bastien Guerry 11 years ago
parent
commit
9272ef3e17
1 changed files with 2 additions and 2 deletions
  1. 2 2
      lisp/org.el

+ 2 - 2
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")))