Emacs Lisp Programming¶
Org-Mode API¶
Get the link to current headline as an external link.
(defun yt/org-get-heading-link ()
(interactive)
(let* ((file-name (file-truename buffer-file-name))
(headline (org-heading-components))
(level (nth 0 headline))
(title (nth 4 headline))
(link (concat file-name
"::"
"*" ;; (yt/lisp-rep "*" level)
title)))
(kill-new (concat "[["
link
"]["
(concat "headline: " title)
"]]"))))