+org-open-old-pdf-links-fn -> +org-open-legacy-pdf-links-fn

Clearer name and added a docstring to explain its purpose.
This commit is contained in:
Henrik Lissner 2020-04-17 22:45:16 -04:00
parent f47de2064c
commit b82068cdcc
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -819,7 +819,8 @@ compelling reason, so..."
:store #'org-pdftools-store-link :store #'org-pdftools-store-link
:export #'org-pdftools-export) :export #'org-pdftools-export)
(add-hook! 'org-open-link-functions (add-hook! 'org-open-link-functions
(defun +org-open-old-pdf-links-fn (link) (defun +org-open-legacy-pdf-links-fn (link)
"Open pdftools:* and pdfviews:* links as if they were pdf:* links."
(let ((regexp "^pdf\\(?:tools\\|view\\):")) (let ((regexp "^pdf\\(?:tools\\|view\\):"))
(when (string-match-p regexp link) (when (string-match-p regexp link)
(org-pdftools-open (replace-regexp-in-string regexp "" link)) (org-pdftools-open (replace-regexp-in-string regexp "" link))