aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--test/test-state.el12
1 files changed, 12 insertions, 0 deletions
diff --git a/test/test-state.el b/test/test-state.el
new file mode 100644
index 0000000..32f52b2
--- /dev/null
+++ b/test/test-state.el
@@ -0,0 +1,12 @@
+(defmacro with-question-data (cell id &rest body)
+ (declare (indent 2))
+ `(let ((,cell '((question_id . ,id)
+ (site_par . "emacs")
+ (last_activity_date . 1234123456))))
+ ,@body))
+
+(ert-deftest test-question-mark-read ()
+ "00ccd139248e782cd8316eff65c26aed838c7e46"
+ (should
+ (with-question-data q nil
+ (sx-question--mark-read q))))