summaryrefslogtreecommitdiff
path: root/test/lisp/json-tests.el
diff options
context:
space:
mode:
Diffstat (limited to 'test/lisp/json-tests.el')
-rw-r--r--test/lisp/json-tests.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/test/lisp/json-tests.el b/test/lisp/json-tests.el
index 47f8047b349..ea562e8b134 100644
--- a/test/lisp/json-tests.el
+++ b/test/lisp/json-tests.el
@@ -309,7 +309,8 @@ Point is moved to beginning of the buffer."
(json-tests--with-temp-buffer ""
(should-error (json-read) :type 'json-end-of-file))
(json-tests--with-temp-buffer "xxx"
- (should-error (json-read) :type 'json-readtable-error)))
+ (let ((err (should-error (json-read) :type 'json-readtable-error)))
+ (should (equal (cdr err) '(?x))))))
(ert-deftest test-json-read-from-string ()
(let ((json-string "{ \"a\": 1 }"))