change implementation of creature/eglot-hover-eldoc-function

lisp/init-eglot.el

@@ -11,11 +11,7 @@
 
 (defun creature/eglot-hover-eldoc-function (cb)
   "Multiple line version of `eglot-hover-eldoc-function'."
-  (let ((eglot-server-capable-fn
-         (if (fboundp 'eglot-server-capable)
-             'eglot-server-capable
-           'eglot--server-capable)))
-    (when (funcall eglot-server-capable-fn :hoverProvider)
+  (when (eglot-server-capable :hoverProvider)
     (let ((buf (current-buffer)))
       (jsonrpc-async-request
        (eglot--current-server-or-lose)
@@ -26,8 +22,7 @@
                                      (eglot--hover-info contents range))))
                          (funcall cb info :buffer t))))
        :deferred :textDocument/hover))
-      (eglot--highlight-piggyback cb)
-      t)))
+    t))
 
 (defun creature/eglot-format ()
   (interactive)