[elpa] externals/compat 295a439f99 4/5: Ensure that json-insert can use json-serialize

[ELPA Syncer]

branch: externals/compat
commit 295a439f99ea365cdd3749b01bbd8c857b383041
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    Ensure that json-insert can use json-serialize
---
 compat-27.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/compat-27.el b/compat-27.el
index 81b205ea87..2106d6924e 100644
--- a/compat-27.el
+++ b/compat-27.el
@@ -161,6 +161,7 @@ any JSON false values."
               (equal (json-parse-string "[]") nil))
           (json-unavailable t)
           (void-function t))
+  :realname compat--json-serialize
   (require 'json)
   (let ((json-false (or (plist-get args :false-object) :false))
         (json-null (or (plist-get args :null-object) :null)))
@@ -176,7 +177,7 @@ OBJECT."
               (equal (json-parse-string "[]") nil))
           (json-unavailable t)
           (void-function t))
-  (insert (apply #'json-serialize object args)))
+  (insert (apply #'compat--json-serialize object args)))
 
 (compat-defun json-parse-string (string &rest args)
   "Parse the JSON STRING into a Lisp object.