summaryrefslogtreecommitdiff
path: root/org-fc.el
diff options
context:
space:
mode:
authorLeon Rische <leon.rische@me.com>2021-03-07 13:09:07 +0100
committerLeon Rische <leon.rische@me.com>2021-03-07 13:09:07 +0100
commitbfcba578aefe0b7d6bad3656462d2b6a538be6d8 (patch)
tree2a93ba4fd915eeae0adb659ff34fbc66f8dfadff /org-fc.el
parent7b6518cc0c9e8940cc53b94e3bd8b783094c7a67 (diff)
Add "after-flip" hook and audio functions
Diffstat (limited to 'org-fc.el')
-rw-r--r--org-fc.el6
1 files changed, 6 insertions, 0 deletions
diff --git a/org-fc.el b/org-fc.el
index 2c55798..3438a6b 100644
--- a/org-fc.el
+++ b/org-fc.el
@@ -151,6 +151,11 @@ Does not apply to cloze single and cloze enumeration cards."
:type 'hook
:group 'org-fc)
+(defcustom org-fc-after-flip-hook '()
+ "Functions run after a card is flipped during review."
+ :type 'hook
+ :group 'org-fc)
+
(defcustom org-fc-before-review-hook '()
"Functions run when a review session is started."
:type 'hook
@@ -1282,6 +1287,7 @@ same ID as the current card in the session."
(org-fc-review-with-current-item card
(let ((type (plist-get card :type)))
(funcall (org-fc-type-flip-fn type))
+ (run-hooks 'org-fc-after-flip-hook)
(org-fc-review-rate-mode)))
(error
(org-fc-review-quit)