[nongnu] elpa/org-drill b0ee414c16 177/251: Fix call to removed variable

[ELPA Syncer]

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

    Fix call to removed variable
---
 org-drill.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/org-drill.el b/org-drill.el
index dc5cf44ff1..bb437b23d9 100644
--- a/org-drill.el
+++ b/org-drill.el
@@ -1837,7 +1837,7 @@ Consider reformulating the item to make it easier to 
remember.\n"
         (org-drill-presentation-timer-cancel)
         (oref session exit-kind)))))
 
-(cl-defun org-drill-presentation-prompt-for-string (prompt)
+(cl-defun org-drill-presentation-prompt-for-string (session prompt)
   "Create a card prompt with a timer and user-specified menu.
 
 Arguments:
@@ -1862,7 +1862,8 @@ You seem to be having a lot of trouble memorising this 
item.
 Consider reformulating the item to make it easier to remember.\n"
                                        'face '(:foreground "red"))
                            full-prompt)))
-    (setq drill-typed-answer (read-string full-prompt nil nil nil t))))
+    (setf (oref session drill-typed-answer)
+          (read-string full-prompt nil nil nil t))))
 
 
 (defun org-pos-in-regexp (pos regexp &optional nlines)
@@ -2127,7 +2128,7 @@ Note: does not actually alter the item."
             (funcall reschedule-fn session))))))
 
 
-(defun org-drill-present-simple-card-with-typed-answer ()
+(defun org-drill-present-simple-card-with-typed-answer (session)
   (with-hidden-comments
    (with-hidden-cloze-hints
     (with-hidden-cloze-text
@@ -2136,7 +2137,7 @@ Note: does not actually alter the item."
      (ignore-errors
        (org-display-inline-images t))
      (org-cycle-hide-drawers 'all)
-     (prog1 (org-drill-presentation-prompt-for-string nil)
+     (prog1 (org-drill-presentation-prompt-for-string session nil)
        (org-drill-hide-subheadings-if 'org-drill-entry-p))))))