From ca31697cc95491c19ff257c29bdab3b88d043b09 Mon Sep 17 00:00:00 2001 From: jao Date: Tue, 25 Aug 2026 21:11:27 +0100 Subject: emacs 31 --- lib/doc/jao-pdf.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'lib/doc/jao-pdf.el') 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)) -- cgit v1.2.3