Very nice, thanks. I like to see the top-level heading too, so I removed the (rest ...) call near the beginning.
From: Anthony Lander [mailto:address@hidden
Sent: Monday, September 24, 2012 7:45 PM
To: Ken Williams
Subject: Re: [O] Breadcrumbs?
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))))
(if (looking-at org-complex-heading-regexp)
(list (match-string 4))))))
(let ((formatted-path (org-format-outline-path
(message "%s" formatted-path))))
CONFIDENTIALITY NOTICE: This e-mail message is for the sole use of the intended recipient(s) and may contain confidential and privileged information. Any unauthorized review, use, disclosure or distribution of any
kind is strictly prohibited. If you are not the intended recipient, please contact the sender via reply e-mail and destroy all copies of the original message. Thank you.