diff options
| author | Phillip Lord <phillip.lord@russet.org.uk> | 2019-06-16 20:21:31 +0100 |
|---|---|---|
| committer | Phillip Lord <phillip.lord@russet.org.uk> | 2019-06-16 20:21:31 +0100 |
| commit | 50885fbeea8a282dc027b03b19097de3c6dabd18 (patch) | |
| tree | 68462f789bb9e339c48d061dad578f6569a3b879 /org-drill.el | |
| parent | a923ba2c90ebb5e7fd66b29f6a3af7fd12b6b9f4 (diff) | |
| download | org-drill-50885fbeea8a282dc027b03b19097de3c6dabd18.tar.gz org-drill-50885fbeea8a282dc027b03b19097de3c6dabd18.zip | |
Refactor robot testing to allow multiple tests
Diffstat (limited to 'org-drill.el')
| -rw-r--r-- | org-drill.el | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/org-drill.el b/org-drill.el index 694d51b..3c55062 100644 --- a/org-drill.el +++ b/org-drill.el @@ -652,6 +652,11 @@ for review unless they were already reviewed in the recent past?" (defvar org-drill-current-session nil) (defvar org-drill-last-session nil) +(defvar org-drill-cards-in-this-emacs 0 + "The total number of cards displayed in this Emacs invocation. + +This variable is not functionally important, but is used for + debugging.") (defvar org-drill-scheduling-properties '("LEARN_DATA" "DRILL_LAST_INTERVAL" "DRILL_REPEATS_SINCE_FAIL" @@ -2578,6 +2583,7 @@ See `org-drill' for more details." (mapc (apply-partially 'org-drill-card-tag-caller 3) (org-get-tags)) + (cl-incf org-drill-cards-in-this-emacs) (org-remove-latex-fragment-image-overlays) rtn)))))) @@ -3056,7 +3062,8 @@ work correctly with older versions of org mode. Your org mode version (%s) appea (let ((session (if resume-p org-drill-last-session - (org-drill-session))) + (setq org-drill-last-session + (org-drill-session)))) (end-pos nil) (cnt 0)) (cl-block org-drill |