summaryrefslogtreecommitdiffhomepage
path: root/lib/doc/jao-org-notes.el
diff options
context:
space:
mode:
Diffstat (limited to 'lib/doc/jao-org-notes.el')
-rw-r--r--lib/doc/jao-org-notes.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/doc/jao-org-notes.el b/lib/doc/jao-org-notes.el
index 4ec0221..fbe3c1f 100644
--- a/lib/doc/jao-org-notes.el
+++ b/lib/doc/jao-org-notes.el
@@ -163,7 +163,7 @@ Search terms that start with a colon are interpreted as tags, and can
appear in any order in the tags list.
"
(interactive)
- (when-let (f (jao-org-notes--consult-rg "Search tags and titles: "))
+ (when-let* ((f (jao-org-notes--consult-rg "Search tags and titles: ")))
(find-file f)))
(defvar jao-org-notes-consult-ripgrep-args
@@ -207,7 +207,7 @@ appear in any order in the tags list.
(file (completing-read "File: " res nil t nil))
(entry (assoc file res)))
(progn (find-file (cadr entry))
- (when-let (line (caddr entry)) (goto-line line)))
+ (when-let* ((line (caddr entry))) (goto-line line)))
(message "Nobody links here!")))
(defun jao-org-notes-insert-tags ()
@@ -218,7 +218,7 @@ appear in any order in the tags list.
(defun jao-org-notes-insert-link ()
"Select a note file (with completion) and insert a link to it."
(interactive)
- (when-let (f (jao-org-notes--consult-rg "Notes file: "))
+ (when-let* ((f (jao-org-notes--consult-rg "Notes file: ")))
(let ((rel-path (file-relative-name f default-directory))
(title (with-current-buffer (find-file-noselect f)
(save-excursion