Eglot: fix thinko in previous commit

* lisp/progmodes/eglot.el (eglot--hierarchy-1): 'roots' is a
vector.

(cherry picked from commit 3e699b3047af70bc8d30e21b295b98dbd6797e9c)

diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index b98f0347ad0c6efef474b1253139ed8ca3fb067a..fd94e91828c05be686103bc395dc5c4b7169950b 100644 (file)
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -4605,7 +4605,8 @@ If NOERROR, return predicate, else erroring function."
                  server
                  preparer
                  (eglot--TextDocumentPositionParams))))
-    (unless roots (eglot--error "No hierarchy information here"))
+    (unless (cl-plusp (length roots))
+      (eglot--error "No hierarchy information here"))
     (with-current-buffer (get-buffer-create name)
       (eglot-hierarchy-mode)
       (setq-local