diff options
-rw-r--r-- | org-fc-algo-sm2.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/org-fc-algo-sm2.el b/org-fc-algo-sm2.el index 3ed01dd..62199f9 100644 --- a/org-fc-algo-sm2.el +++ b/org-fc-algo-sm2.el @@ -165,8 +165,11 @@ EASE, BOX and INTERVAL are the current parameters of the card." (defun org-fc-algo-sm2-initial-review-data (position) "Initial SM2 review data for POSITION." - (list position (org-fc-algo-sm2-ease-initial) 0 0 - (org-fc-timestamp-in 0))) + (let* ((box 0) + (ease (org-fc-algo-sm2-ease-initial)) + (interval 0) + (due (org-fc-timestamp-in interval))) + (list position ease box interval due))) ;;; Footer |