From 362c643163db3f738582e25d117e5662f0d495cf Mon Sep 17 00:00:00 2001 From: Phillip Lord Date: Sun, 23 Jun 2019 20:45:09 +0100 Subject: Fix more compile error messages --- org-drill.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/org-drill.el b/org-drill.el index c8d8cf5..38f3249 100644 --- a/org-drill.el +++ b/org-drill.el @@ -723,7 +723,7 @@ regardless of whether the test was successful.") (defmacro org-drill-push-end (val place) "Add VAL to the end of the sequence stored in PLACE. Return the new value." - `(setq ,place (append ,place (list ,val)))) + `(setf ,place (append ,place (list ,val)))) (defun org-drill-round-float (floatnum fix) "Round the floating point number FLOATNUM to FIX decimal places. @@ -1409,8 +1409,8 @@ of QUALITY." (org-drill-get-item-data) (if (stringp weight) (setq weight (read weight))) - (cl-destructuring-bind (next-interval repetitions ease - failures meanq total-repeats + (cl-destructuring-bind (next-interval _repetitions _ease + _failures _meanq total-repeats &optional ofmatrix) (cl-case org-drill-spaced-repetition-algorithm (sm5 (org-drill-determine-next-interval-sm5 last-interval repetitions -- cgit v1.2.3