From 39c13d240bd6f22161df07a7bda7f1ef2d56832a Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Fri, 8 Mar 2024 12:56:51 +0200 Subject: [fix] gnosis-edit-update-note: Add assert for suspend Make sure that suspend value is either 0 or 1 --- gnosis.el | 1 + 1 file changed, 1 insertion(+) diff --git a/gnosis.el b/gnosis.el index 2fd0140..f338de9 100644 --- a/gnosis.el +++ b/gnosis.el @@ -1403,6 +1403,7 @@ SUSPEND: Suspend note, 0 for unsuspend, 1 for suspend" (cl-assert (listp tags) nil "Tags must be a list of strings") (cl-assert (and (listp ef) (length= ef 3)) nil "ef must be a list of 3 floats") (cl-assert (or (stringp options) (listp options)) nil "Options must be a string, or a list for MCQ") + (cl-assert (or (= suspend 0) (= suspend 1)) nil "Suspend must be either 0 or 1") ;; Construct the update clause for the emacsql update statement. (cl-loop for (field . value) in `((main . ,main) -- cgit v1.2.3