summaryrefslogtreecommitdiffhomepage
path: root/lib/doc/jao-org-links.el
diff options
context:
space:
mode:
Diffstat (limited to 'lib/doc/jao-org-links.el')
-rw-r--r--lib/doc/jao-org-links.el9
1 files changed, 6 insertions, 3 deletions
diff --git a/lib/doc/jao-org-links.el b/lib/doc/jao-org-links.el
index fc1a241..1bd8709 100644
--- a/lib/doc/jao-org-links.el
+++ b/lib/doc/jao-org-links.el
@@ -8,6 +8,8 @@
(require 'jao-pdf)
(require 'jao-afio)
+(declare-function jao-pdf-skim-org "jao-mac")
+
(defvar jao-org--sink-dir "./")
(defvar jao-org-open-pdf-fun #'jao-org--default-open)
@@ -112,9 +114,9 @@
(new (not (file-exists-p file))))
(if (and (not file-name) (or arg new))
(org-store-link nil t)
- (when-let* ((fboundp 'jao-pdf-skim-org-link)
- (lnk (jao-pdf-skim-org-link nil)))
- (kill-new lnk)))
+ (when (fboundp 'jao-pdf-skim-org-link)
+ (when-let* ((lnk (jao-pdf-skim-org-link nil)))
+ (kill-new lnk))))
(find-file-other-window file)
(when new
(jao-org-insert-doc-skeleton (jao-pdf-title file-name))
@@ -123,6 +125,7 @@
;;;###autoload
(defun jao-org-pdf-goto-org* () (interactive) (jao-org-pdf-goto-org t))
+;;;###autoload
(defun jao-org-org-to-pdf-file ()
(expand-file-name (concat "doc/" (file-name-base buffer-file-name) ".pdf")
(file-name-directory jao-org-notes-dir)))