From 6c14bd6c5079bfb384134f4275a5f289f92e4ab5 Mon Sep 17 00:00:00 2001 From: Phillip Lord Date: Sat, 15 Jun 2019 12:29:52 +0100 Subject: Update robot, Fix remaining CL dependencies The robot test now includes "with-typing" input. This uncovered some more usages of cl.el which are now gone. --- org-drill.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'org-drill.el') diff --git a/org-drill.el b/org-drill.el index 6497367..e3ba4fb 100644 --- a/org-drill.el +++ b/org-drill.el @@ -2638,7 +2638,7 @@ maximum number of items." (*org-drill-again-entries* (pop *org-drill-again-entries*)) (t ; nothing left -- return nil - (return-from org-drill-pop-next-pending-entry nil))))) + (cl-return-from org-drill-pop-next-pending-entry nil))))) m))) @@ -2680,10 +2680,10 @@ RESUMING-P is true if we are resuming a suspended drill session." ((null result) (message "Quit") (setq end-pos :quit) - (return-from org-drill-entries nil)) + (cl-return-from org-drill-entries nil)) ((eql result 'edit) (setq end-pos (point-marker)) - (return-from org-drill-entries nil)) + (cl-return-from org-drill-entries nil)) ((eql result 'skip) (setq *org-drill-current-item* nil) nil) ; skip this item @@ -3265,7 +3265,7 @@ the tag 'imported'." (condition-case nil (org-find-olp path t) (error ; path does not exist in DEST - (return-from org-drill-copy-entry-to-other-buffer + (cl-return-from org-drill-copy-entry-to-other-buffer (cond ((cdr path) (org-drill-copy-entry-to-other-buffer -- cgit v1.2.3