summaryrefslogtreecommitdiffhomepage
path: root/lib/doc/jao-org-links.el
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2021-04-12 03:51:23 +0100
committerjao <jao@gnu.org>2021-04-12 03:51:23 +0100
commit5dd64cbc0b91ca9ec6bb1eecca030393ded6e549 (patch)
tree467e6aa6b75a8b86c340796fa3c0953d7981bd43 /lib/doc/jao-org-links.el
parentca4ab244f1731c78ee890b4f7737babed87315e7 (diff)
downloadelibs-5dd64cbc0b91ca9ec6bb1eecca030393ded6e549.tar.gz
elibs-5dd64cbc0b91ca9ec6bb1eecca030393ded6e549.tar.bz2
zathura support improvements
Diffstat (limited to 'lib/doc/jao-org-links.el')
-rw-r--r--lib/doc/jao-org-links.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/doc/jao-org-links.el b/lib/doc/jao-org-links.el
index 5848698..ab07498 100644
--- a/lib/doc/jao-org-links.el
+++ b/lib/doc/jao-org-links.el
@@ -49,7 +49,10 @@
(let ((f (replace-regexp-in-string "^file:" "doc:"
(org-file-complete-link arg))))
(if (jao-doc-view-is-pdf f)
- (concat f "::" (read-from-minibuffer "Page: " "1"))
+ (let ((page (read-from-minibuffer "Page: " "")))
+ (if (> (string-to-number page) 0)
+ (concat f "::" (read-from-minibuffer "Page: " ""))
+ f))
f))))
(defun jao-org-links-open-mail (fname)