summaryrefslogtreecommitdiff
path: root/gnosis.el
diff options
context:
space:
mode:
Diffstat (limited to 'gnosis.el')
-rw-r--r--gnosis.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/gnosis.el b/gnosis.el
index e1749c6..94e56a7 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -95,7 +95,7 @@ to \"push\" will execute the command 'git push'."
(bound-and-true-p vertico-mode))
#'completing-read)
(t #'ido-completing-read))
- "Function to use for completing-read."
+ "Function to use for `completing-read'."
:type 'function
:group 'gnosis)
@@ -819,9 +819,9 @@ Returns a list of unique tags."
(let* ((tags '())
(tag "")
(use-prev (when gnosis-previous-note-tags
- (y-or-n-p (format "Use tags from previous note? %s" gnosis-previous-note-tags)))))
+ (y-or-n-p (format "Use tags from previous note %s?" gnosis-previous-note-tags)))))
(if use-prev
- (setq tags gnosis-previous-note-tags)
+ (setf tags gnosis-previous-note-tags)
(while (not (string= tag "q"))
(setf tag (funcall gnosis-completing-read-function (concat prompt (format " %s (q for quit): " tags))
(cons "q" (if due (gnosis-review-get-due-tags)
@@ -1053,7 +1053,7 @@ NOTE-NUM: The number of notes reviewed in the session."
;; TODO: Redo this using vc
(shell-command (concat git " add " (shell-quote-argument "gnosis.db")))
(shell-command (concat git " commit -m "
- (shell-quote-argument (concat (format "Total notes for session: %d " note-num)))))
+ (shell-quote-argument (format "Total notes for session: %d " note-num))))
(when gnosis-auto-push
(shell-command (concat git " " gnosis-auto-push-command)))
(message "Review session finished. %d notes reviewed." note-num)))