|
@@ -6843,7 +6843,7 @@ hierarchy above."
|
|
(selected-point
|
|
(selected-point
|
|
(if (eq interface 'outline)
|
|
(if (eq interface 'outline)
|
|
(car (org-get-location (current-buffer) org-goto-help))
|
|
(car (org-get-location (current-buffer) org-goto-help))
|
|
- (let ((pa (org-refile-get-location "Goto")))
|
|
|
|
|
|
+ (let ((pa (org-refile-get-location "Goto" nil nil t)))
|
|
(org-refile-check-position pa)
|
|
(org-refile-check-position pa)
|
|
(nth 3 pa)))))
|
|
(nth 3 pa)))))
|
|
(if selected-point
|
|
(if selected-point
|