From 983d84f653b88bc833eb80a4c03e3485f18c53d2 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Sun, 3 Mar 2024 03:41:08 +0200 Subject: Add gnosis-get-ef-decrease --- gnosis.el | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'gnosis.el') diff --git a/gnosis.el b/gnosis.el index 93c261e..90adb10 100644 --- a/gnosis.el +++ b/gnosis.el @@ -1356,6 +1356,11 @@ SECOND-IMAGE: Image to display after user-input" (let ((ef-increase (gnosis-get 'ef-increase 'decks `(= id ,(gnosis-get 'deck-id 'notes `(= id ,id)))))) (or ef-increase gnosis-algorithm-ef-increase))) +(defun gnosis-get-ef-decrease (id) + "Return ef-decrease for note with value of id ID." + (let ((ef-decrease (gnosis-get 'ef-decrease 'decks `(= id ,(gnosis-get 'deck-id 'notes `(= id ,id)))))) + (or ef-decrease gnosis-algorithm-ef-decrease))) + (cl-defun gnosis-export-note (id &optional (export-for-deck nil)) "Export fields for note with value of id ID. -- cgit v1.2.3