From a25a64203e3057b31fd2afc48bd762cc8a807d9d Mon Sep 17 00:00:00 2001 From: Pip Cet Date: Sat, 29 Jun 2019 04:14:35 +0000 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 7d824b5c95..383991b073 100644 --- a/test/src/json-tests.el +++ b/test/src/json-tests.el @@ -76,7 +76,8 @@ json-serialize/object (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.20.1