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

org-drill.el: fix a few wrong :type spec. 

* org-drill.el (org-drill-leech-method, org-drill-scope)
(org-drill-spaced-repetition-algorithm): Fix wrong :type spec.

Thanks to Joost Kremers for spotting this.
This commit is contained in:
Bastien Guerry 2011-12-26 15:40:02 +01:00
parent 80dd8f47f0
commit 371b0cf9aa
1 changed files with 30 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1,28 +1,28 @@
;;; -*- coding: utf-8-unix -*- ;; -*- coding: utf-8-unix -*-
;;; org-drill.el - Self-testing using spaced repetition ;; org-drill.el - Self-testing using spaced repetition
;;; ;;
;;; Author: Paul Sexton <eeeickythump@gmail.com> ;; Author: Paul Sexton <eeeickythump@gmail.com>
;;; Version: 2.3.5 ;; Version: 2.3.5
;;; Repository at http://bitbucket.org/eeeickythump/org-drill/ ;; Repository at http://bitbucket.org/eeeickythump/org-drill/
;;; ;;
;;; ;; This file is not part of GNU Emacs.
;;; Synopsis ;;
;;; ======== ;; Synopsis
;;; ;; ========
;;; Uses the SuperMemo spaced repetition algorithms to conduct interactive ;;
;;; "drill sessions", where the material to be remembered is presented to the ;; Uses the SuperMemo spaced repetition algorithms to conduct interactive
;;; student in random order. The student rates his or her recall of each item, ;; "drill sessions", where the material to be remembered is presented to the
;;; and this information is used to schedule the item for later revision. ;; student in random order. The student rates his or her recall of each item,
;;; ;; and this information is used to schedule the item for later revision.
;;; Each drill session can be restricted to topics in the current buffer ;;
;;; (default), one or several files, all agenda files, or a subtree. A single ;; Each drill session can be restricted to topics in the current buffer
;;; topic can also be drilled. ;; (default), one or several files, all agenda files, or a subtree. A single
;;; ;; topic can also be drilled.
;;; Different "card types" can be defined, which present their information to ;;
;;; the student in different ways. ;; Different "card types" can be defined, which present their information to
;;; ;; the student in different ways.
;;; See the file README.org for more detailed documentation. ;;
;; See the file README.org in the repository for more detailed documentation.
(eval-when-compile (require 'cl)) (eval-when-compile (require 'cl))
(eval-when-compile (require 'hi-lock)) (eval-when-compile (require 'hi-lock))
@ -37,7 +37,6 @@
:group 'org-link) :group 'org-link)
(defcustom org-drill-question-tag (defcustom org-drill-question-tag
"drill" "drill"
"Tag which topics must possess in order to be identified as review topics "Tag which topics must possess in order to be identified as review topics
@ -54,7 +53,6 @@ Nil means unlimited."
:type '(choice integer (const nil))) :type '(choice integer (const nil)))
(defcustom org-drill-maximum-duration (defcustom org-drill-maximum-duration
20 20
"Maximum duration of a drill session, in minutes. "Maximum duration of a drill session, in minutes.
@ -107,7 +105,7 @@ Possible values:
but a warning message is printed when each leech item is but a warning message is printed when each leech item is
presented." presented."
:group 'org-drill :group 'org-drill
:type '(choice (const 'warn) (const 'skip) (const nil))) :type '(choice (const warn) (const skip) (const nil)))
(defface org-drill-visible-cloze-face (defface org-drill-visible-cloze-face
@ -262,9 +260,9 @@ directory All files with the extension '.org' in the same
;; 'file-no-restriction' means current file/buffer, ignoring restrictions ;; 'file-no-restriction' means current file/buffer, ignoring restrictions
;; 'directory' means all *.org files in current directory ;; 'directory' means all *.org files in current directory
:group 'org-drill :group 'org-drill
:type '(choice (const 'file) (const 'tree) (const 'file-no-restriction) :type '(choice (const file) (const tree) (const file-no-restriction)
(const 'file-with-archives) (const 'agenda) (const file-with-archives) (const agenda)
(const 'agenda-with-archives) (const 'directory) (const agenda-with-archives) (const directory)
list)) list))
@ -290,7 +288,7 @@ Available choices are:
adjusting intervals when items are reviewed early or late has been taken adjusting intervals when items are reviewed early or late has been taken
from SM11, a later version of the algorithm, and included in Simple8." from SM11, a later version of the algorithm, and included in Simple8."
:group 'org-drill :group 'org-drill
:type '(choice (const 'sm2) (const 'sm5) (const 'simple8))) :type '(choice (const sm2) (const sm5) (const simple8)))
(defcustom org-drill-optimal-factor-matrix (defcustom org-drill-optimal-factor-matrix