From bc87ee925dfb465c32db85262fd264d25cdbecac Mon Sep 17 00:00:00 2001 From: Pip Cet Date: Fri, 28 Jun 2019 22:01:00 -0700 Subject: [PATCH] Fix json-serialize/object test failure * test/src/json-tests.el (json-serialize/object): Accept failure with different code. --- test/src/json-tests.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/test/src/json-tests.el b/test/src/json-tests.el index 7d824b5c953..383991b0736 100644 --- a/test/src/json-tests.el +++ b/test/src/json-tests.el @@ -76,7 +76,8 @@ (should (equal (json-serialize '(abc [1 2 t] :def :null)) "{\"abc\":[1,2,true],\"def\":null}")) (should-error (json-serialize '#1=(:a 1 . #1#)) :type 'circular-list) - (should-error (json-serialize '#1=(:a 1 :b . #1#)) :type 'circular-list) + (should-error (json-serialize '#1=(:a 1 :b . #1#)):type '(circular-list + wrong-type-argument)) (should-error (json-serialize '(:foo "bar" (unexpected-alist-key . 1))) :type 'wrong-type-argument) (should-error (json-serialize '((abc . "abc") :unexpected-plist-key "key")) -- 2.39.2