[elpa] externals/company 57734334e2: Update old test for the "new interpreted lambda" format in Emacs 30.1

[ELPA Syncer]

branch: externals/company
commit 57734334e29c0066a237b1001c93782746b6e45c
Author: Dmitry Gutov <dmitry@gutov.dev>
Commit: Dmitry Gutov <dmitry@gutov.dev>

    Update old test for the "new interpreted lambda" format in Emacs 30.1
---
 test/async-tests.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/test/async-tests.el b/test/async-tests.el
index 1c9253944f..6e350f0204 100644
--- a/test/async-tests.el
+++ b/test/async-tests.el
@@ -48,7 +48,7 @@
   (let ((company-backend 'company-async-backend))
     (should (equal "foo" (company-call-backend-raw 'prefix)))
     (should (equal :async (car (company-call-backend-raw 'candidates "foo"))))
-    (should (equal 'closure (cadr (company-call-backend-raw 'candidates 
"foo"))))))
+    (should (functionp (cdr (company-call-backend-raw 'candidates "foo"))))))
 
 (ert-deftest company-manual-begin-forces-async-candidates-to-sync ()
   (with-temp-buffer