summaryrefslogtreecommitdiffhomepage
path: root/lib/doc/jao-pdf.el
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2026-08-25 21:11:27 +0100
committerjao <jao@gnu.org>2026-08-25 21:11:27 +0100
commitca31697cc95491c19ff257c29bdab3b88d043b09 (patch)
treebc14b9744c783dd1121b36ffadf21e3d7dc0bb7a /lib/doc/jao-pdf.el
parentdba7a443d0edb88869c4df70622543a465cf9304 (diff)
downloadelibs-ca31697cc95491c19ff257c29bdab3b88d043b09.tar.gz
elibs-ca31697cc95491c19ff257c29bdab3b88d043b09.tar.bz2
emacs 31main
Diffstat (limited to 'lib/doc/jao-pdf.el')
-rw-r--r--lib/doc/jao-pdf.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/doc/jao-pdf.el b/lib/doc/jao-pdf.el
index 162cd9a..5d27048 100644
--- a/lib/doc/jao-pdf.el
+++ b/lib/doc/jao-pdf.el
@@ -145,9 +145,9 @@
(defun jao-open-doc (&optional file page height)
(interactive)
- (when-let (file (or file
- (read-file-name "Document: "
- (concat jao-org-dir "/doc/"))))
+ (when-let* ((file (or file
+ (read-file-name "Document: "
+ (concat jao-org-dir "/doc/")))))
(funcall jao-open-doc-fun file page height)))
(defun jao-select-pdf ()
@@ -157,7 +157,7 @@
(defun jao-open-with-zathura ()
(interactive)
- (when-let (f buffer-file-name)
+ (when-let* ((f buffer-file-name))
(let ((p (jao-doc-view-current-page)))
(cond (jao-river-enabled (jao-river-open-with-zathura f p))
(jao-sway-enabled (jao-sway-open-with-zathura f p))