|Subject:||Re: [O] Breadcrumbs?|
|Date:||Mon, 24 Sep 2012 20:44:52 -0400|
On 12-Sep-24, at 5:36 PM, Ken Williams wrote:
You can bind this to a speed command. It will show you the path to the current headline (less the first heading) in the echo area, and will also copy it to the kill ring. This is the functionality I need, but it would be easy to modify to do what you want.
(defun org-copy-outline-path-less-root-to-kill-ring (&optional a b)
"Copy the current outline path, less the first node, to the
kill ring, and echo to the echo area."
(let* ((bfn (buffer-file-name (buffer-base-buffer)))
(path (rest (org-get-outline-path))))
(setq path (append path
(if (looking-at org-complex-heading-regexp)
(list (match-string 4))))))
(let ((formatted-path (org-format-outline-path
(message "%s" formatted-path))))
Hope this helps,
|[Prev in Thread]||Current Thread||[Next in Thread]|