Merge remote-tracking branch 'savannah/master' into feature/tree-sitter

1 files changed, 1 insertions, 1 deletions

diff --git a/src/json.c b/src/json.c
index 957f91b46bb..4b3fabb3eb3 100644
--- a/src/json.c
+++ b/src/json.c
@@ -364,7 +364,7 @@ lisp_to_json_nonscalar_1 (Lisp_Object lisp,
       for (ptrdiff_t i = 0; i < HASH_TABLE_SIZE (h); ++i)
         {
           Lisp_Object key = HASH_KEY (h, i);
-          if (!EQ (key, Qunbound))
+          if (!BASE_EQ (key, Qunbound))
             {
               CHECK_STRING (key);
               Lisp_Object ekey = json_encode (key);