aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPhillip Lord <phillip.lord@russet.org.uk>2019-06-22 12:36:54 +0100
committerPhillip Lord <phillip.lord@russet.org.uk>2019-06-22 12:36:54 +0100
commit4300ef9d4c70ce47bee196ee49b873fe8603ff66 (patch)
tree950a8445b212552accd7ad7a7e65d766c0e14696
parent5d4f60d49d84ed0c22cfc1be0a84e87a82c1c5b3 (diff)
downloadorg-drill-4300ef9d4c70ce47bee196ee49b873fe8603ff66.tar.gz
org-drill-4300ef9d4c70ce47bee196ee49b873fe8603ff66.zip
Fix broken form in org-drill-resume
-rw-r--r--org-drill.el26
1 files changed, 13 insertions, 13 deletions
diff --git a/org-drill.el b/org-drill.el
index c5b3366..6939405 100644
--- a/org-drill.el
+++ b/org-drill.el
@@ -3140,20 +3140,20 @@ scan will be performed."
"Resume a suspended drill session. Sessions are suspended by
exiting them with the `edit' or `quit' options."
(interactive)
- (let ((session org-drill-last-session)))
- (cond
- ((org-drill-entries-pending-p session)
- (org-drill nil nil t))
- ((and (cl-plusp (org-drill-pending-entry-count session))
- ;; Current drill session is finished, but there are still
- ;; more items which need to be reviewed.
- (y-or-n-p (format
- "You have finished the drill session. However, %d items still
+ (let ((session org-drill-last-session))
+ (cond
+ ((org-drill-entries-pending-p session)
+ (org-drill nil nil t))
+ ((and (cl-plusp (org-drill-pending-entry-count session))
+ ;; Current drill session is finished, but there are still
+ ;; more items which need to be reviewed.
+ (y-or-n-p (format
+ "You have finished the drill session. However, %d items still
need reviewing. Start a new drill session? "
- (org-drill-pending-entry-count session))))
- (org-drill-again))
- (t
- (message "You have finished the drill session."))))
+ (org-drill-pending-entry-count session))))
+ (org-drill-again))
+ (t
+ (message "You have finished the drill session.")))))
(defun org-drill-relearn-item ()