[elpa] externals/compat 501c9f631e 2/2: Re-add void-function tests removed in ec82f43ef0

[ELPA Syncer]

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

    Re-add void-function tests removed in ec82f43ef0
---
 compat-27.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/compat-27.el b/compat-27.el
index b08d5604d4..f4eb621b6e 100644
--- a/compat-27.el
+++ b/compat-27.el
@@ -172,6 +172,7 @@ any JSON false values."
   :cond (not (condition-case nil
                  (equal (json-serialize '()) "{}")
                (:success t)
+               (void-function nil)
                (json-unavailable nil)))
   :realname compat--json-serialize
   (require 'json)
@@ -232,6 +233,7 @@ OBJECT."
   :cond (not (condition-case nil
                  (equal (json-serialize '()) "{}")
                (:success t)
+               (void-function nil)
                (json-unavailable nil)))
   (insert (apply #'compat--json-serialize object args)))
 
@@ -262,6 +264,7 @@ represent a JSON false value.  It defaults to `:false'."
   :cond (not (condition-case nil
                  (equal (json-serialize '()) "{}")
                (:success t)
+               (void-function nil)
                (json-unavailable nil)))
   (require 'json)
   (condition-case err
@@ -305,6 +308,7 @@ represent a JSON false value.  It defaults to `:false'."
   :cond (not (condition-case nil
                  (equal (json-serialize '()) "{}")
                (:success t)
+               (void-function nil)
                (json-unavailable nil)))
   (require 'json)
   (condition-case err