ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Merge branch 'maint'

This commit is contained in:
Nicolas Goaziou 2019-04-07 08:58:43 +02:00
parent 3375f039dd 6ec402dc91
commit 7cd850a3ef
1 changed files with 5 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
contrib/lisp/org-drill.el
View File

@ -241,10 +241,9 @@ the hidden cloze during a test.")
(defun org-drill--compute-cloze-keywords ()
(list (list (org-drill--compute-cloze-regexp)
(copy-list '(1 'org-drill-visible-cloze-face nil))
(copy-list '(2 'org-drill-visible-cloze-hint-face t))
(copy-list '(3 'org-drill-visible-cloze-face nil))
)))
(list 1 'org-drill-visible-cloze-face nil)
(list 2 'org-drill-visible-cloze-hint-face t)
(list 3 'org-drill-visible-cloze-face nil))))
(defvar-local org-drill-cloze-regexp
(org-drill--compute-cloze-regexp))
@ -1011,7 +1010,7 @@ in the matrix."
(learn-str
(let ((learn-data (or (and learn-str
(read learn-str))
(copy-list initial-repetition-state))))
(copy-sequence initial-repetition-state))))
(list (nth 0 learn-data) ; last interval
(nth 1 learn-data) ; repetitions
(org-drill-entry-failure-count)