aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPhillip Lord <phillip.lord@russet.org.uk>2019-07-11 22:11:40 +0100
committerPhillip Lord <phillip.lord@russet.org.uk>2019-07-11 22:11:40 +0100
commit6938a466e0305450170e48476e551c12d55669a7 (patch)
tree170e06c09e4cf2a89703054d7a469b8350583f9b
parent7adb9aab5ad25fe562d86d40111dcd485a807303 (diff)
downloadorg-drill-6938a466e0305450170e48476e551c12d55669a7.tar.gz
org-drill-6938a466e0305450170e48476e551c12d55669a7.zip
Update documentation
-rw-r--r--org-drill.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/org-drill.el b/org-drill.el
index 5f35aba..3076a48 100644
--- a/org-drill.el
+++ b/org-drill.el
@@ -813,6 +813,7 @@ situation use `org-part-of-drill-entry-p'."
(member org-drill-question-tag (org-get-tags nil t))))
(defun org-drill-goto-entry (marker)
+ "Switch to the buffer and position of MARKER."
(switch-to-buffer (marker-buffer marker))
(goto-char marker))
@@ -901,11 +902,15 @@ from the entry at point."
org-drill-overdue-interval-factor)))
(defun org-drill-entry-due-p (session)
+ "Return non-nil if the entry at point is overdue.
+
+The SESSION can affect the definition of overdue."
(let ((due (org-drill-entry-days-overdue session)))
(and (not (null due))
(not (cl-minusp due)))))
(defun org-drill-entry-new-p ()
+ "Return non-nil if the entry at point is new."
(and (org-drill-entry-p)
(let ((item-time (org-get-scheduled-time (point))))
(null item-time))))