From: Eshel Yaron <me@eshelyaron.com>
Date: Fri, 24 May 2024 09:04:47 +0000 (+0200)
Subject: Fix 'completion-preview-cursor-type' test
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=573809efcbf7e620b83fd610c37ded3c46722b09;p=emacs.git

Fix 'completion-preview-cursor-type' test
---

diff --git a/test/lisp/completion-preview-tests.el b/test/lisp/completion-preview-tests.el
index 1b0ef28f54d..06f5ee32e32 100644
--- a/test/lisp/completion-preview-tests.el
+++ b/test/lisp/completion-preview-tests.el
@@ -318,7 +318,7 @@ instead."
     (let ((this-command 'self-insert-command))
       (completion-preview--post-command))
     (should (eq completion-preview-cursor-type
-                (window-parameter nil 'cursor-type)))
+                (window-cursor-type nil)))
     (should (completion-preview--cursor-modified-p))
     (let ((this-command 'keyboard-quit))
       (completion-preview--post-command))