emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/org-drill 4300ef9d4c 168/251: Fix broken form in org-drill


From: ELPA Syncer
Subject: [nongnu] elpa/org-drill 4300ef9d4c 168/251: Fix broken form in org-drill-resume
Date: Mon, 17 Jan 2022 18:59:13 -0500 (EST)

branch: elpa/org-drill
commit 4300ef9d4c70ce47bee196ee49b873fe8603ff66
Author: Phillip Lord <phillip.lord@russet.org.uk>
Commit: Phillip Lord <phillip.lord@russet.org.uk>

    Fix broken form in org-drill-resume
---
 org-drill.el | 26 +++++++++++++-------------
 1 file changed, 13 insertions(+), 13 deletions(-)

diff --git a/org-drill.el b/org-drill.el
index c5b3366bca..6939405089 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 ()



reply via email to

[Prev in Thread] Current Thread [Next in Thread]