Skip to content

Commit

Permalink
Merge pull request #14 from Alexander-Miller/log-location
Browse files Browse the repository at this point in the history
Collect refile destination so it can be logged on completion.
  • Loading branch information
Thierry Volpiatto authored Mar 11, 2020
2 parents 8457e1e + ae8e3f6 commit b7a18df
Showing 1 changed file with 6 additions and 1 deletion.
7 changes: 6 additions & 1 deletion helm-org.el
Original file line number Diff line number Diff line change
Expand Up @@ -396,7 +396,12 @@ will be refiled."
(let* ((victims (with-helm-buffer (helm-marked-candidates)))
(buffer (marker-buffer marker))
(filename (buffer-file-name buffer))
(rfloc (list nil filename nil marker)))
;; get the heading we refile to so org doesn't
;; output 'Refile to "nil" in file ...'
(heading (with-current-buffer buffer
(org-with-point-at marker
(org-get-heading :no-tags :no-todo :no-priority :no-comment))))
(rfloc (list heading filename nil marker)))
(when (and (= 1 (length victims))
(equal (helm-get-selection) (car victims)))
;; No candidates are marked; we are refiling the entry at point
Expand Down

0 comments on commit b7a18df

Please sign in to comment.