summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2024-07-23 18:44:59 +0300
committerThanos Apollo <[email protected]>2024-07-23 18:44:59 +0300
commit8d20fc3183ab2ce486d76df452144d3b1ea7edda (patch)
treefa28ef5ad27a280bca8e971f7703408a36c51c19
parent5d74e3fa6f203477610d3f8d8b1838f4b3027ff9 (diff)
New function: get-date-new-notes.
* Get new notes for date.
-rw-r--r--gnosis.el9
1 files changed, 9 insertions, 0 deletions
diff --git a/gnosis.el b/gnosis.el
index 1a425cc..bd27619 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -2043,6 +2043,15 @@ Defaults to current date."
(gnosis--insert-into 'activity-log `([,date 0]))
0))))
+(defun gnosis-get-date-new-notes (&optional date)
+ "Return total notes reviewed for DATE.
+
+Defaults to current date."
+ (cl-assert (listp date) nil "Date must be a list.")
+ (let* ((date (or date (gnosis-algorithm-date)))
+ (reviewed-new (or (car (gnosis-select 'reviewed-new 'activity-log `(= date ',date) t)) 0)))
+ reviewed-new))
+
(cl-defun gnosis-export-note (id &optional (export-for-deck nil))
"Export fields for note with value of id ID.