Is there a function in elisp that will return the description of an internal org-mode link?
I would want this to work for any type of supported link:
[[link][description]]
[[description]]
Etc.
3 Answers
I guess you want something like:
(defun get-description-at-point ()
(interactive)
(let ((link (org-element-context)))
(message "%s" (buffer-substring (org-element-property :contents-begin link)
(org-element-property :contents-end link)))))
answered Jan 23, 2018 at 19:22
-
1The command behaves differently depending on whether it is invoked interactively or programmatically. I managed to make its behavior consistent by replacing
buffer-substringwithbuffer-substring-no-properties.– PabloOct 14, 2021 at 22:27
You can also use regex to extract the link description:
(replace-regexp-in-string "\\(\\[\\[.*\\]\\[\\)\\(.*\\)\\]\\]" "[[\\2]]" "[[link][description]]")
will return [[description]].
If you omit the opening and closing braces in the second argument (that is, \\2), you will get description.
Note: I'm just beginning to use regex, so perhaps there are better solutions to set up the regex.
There exists (org-link-display-format s), which replaces all links in s with there description.
For your case you than just need to add the brackets where you want them:
(concat "[[" (org-link-display-format "[[link][description]]") "]]")
org-open-at-pointhas some goodies (inside) that you may wish to look at -- i.e.,M-x find-function ...I tend to avoid mostorg-modequestions directly nowadays because everyone has a different version and the library is under constant development.