From 3648d8b8cae071897c20159b37e1b99791de720d Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Thu, 14 Dec 2023 20:53:05 +0200 Subject: Update addition of note-mcq type Add review-log info & date statements --- gnosis.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/gnosis.el b/gnosis.el index 214ecf7..2a71646 100644 --- a/gnosis.el +++ b/gnosis.el @@ -158,8 +158,10 @@ TAGS are used to organize questions." (error "The correct answer must be the number of the correct answer")) (gnosis--insert-into 'notes `([nil "mcq" ,question ,choices ,correct-answer ,tags ,deck])) ;; Get last inserted note-id - (let ((note-id (caar (last (gnosis--select 'id 'notes))))) - (gnosis--insert-into 'review `([,note-id ,gnosis-ef ,gnosis-ff 0 0 0])))) + (let* ((note-id (caar (last (gnosis--select 'id 'notes)))) + (date (gnosis-current-date))) + (gnosis--insert-into 'review `([,note-id ,gnosis-ef ,gnosis-ff 0 0])) + (gnosis--insert-into 'review-log `([,note-id 0 ,date 0])))) (defun gnosis-add-note (type) "Create note as TYPE." -- cgit v1.2.3