From: João Távora <joaotavora@gmail.com>
Date: Mon, 25 Jun 2018 12:12:55 +0000 (+0100)
Subject: Unbreak imenu for cquery servers (and probably more)
X-Git-Tag: emacs-29.0.90~1616^2~524^2~4^2~484
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9b3ef1315ce3d0cb3762a92158a7241af31dd6cc;p=emacs.git

Unbreak imenu for cquery servers (and probably more)

* eglot.el (eglot-imenu): Don't try to make a group for symbols
without kind.

GitHub-reference: close https://github.com/joaotavora/eglot/issues/31
---

diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index f8574e9428e..88746a72823 100644
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -1349,8 +1349,10 @@ If SKIP-SIGNATURE, don't try to send textDocument/signatureHelp."
                                :textDocument/documentSymbol
                                `(:textDocument ,(eglot--TextDocumentIdentifier))))))
         (append
-         (seq-group-by (lambda (e) (get-text-property 0 :kind (car e)))
-                       entries)
+         (cl-remove nil
+                    (seq-group-by (lambda (e) (get-text-property 0 :kind (car e)))
+                                  entries)
+                    :key #'car)
          entries))
     (funcall oldfun)))