Fix void-variable link when opening legacy pdf links

This commit is contained in:
Henrik Lissner 2020-04-16 14:51:26 -04:00
parent 002b86b559
commit 3efef6e38f
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -824,9 +824,9 @@ compelling reason, so..."
: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 (path) (defun +org-open-old-pdf-links-fn (link)
(let ((regexp "^pdf\\(?:tools\\|view\\):")) (let ((regexp "^pdf\\(?:tools\\|view\\):"))
(when (string-match-p regexp path) (when (string-match-p regexp link)
(org-link-open (replace-regexp-in-string regexp "pdf:" link)) (org-link-open (replace-regexp-in-string regexp "pdf:" link))
t)))) t))))