From: Michal Krzywkowski <k.michal@zoho.com>
Date: Wed, 31 Oct 2018 11:54:26 +0000 (+0100)
Subject: Remove duplicates from imenu
X-Git-Tag: emacs-29.0.90~1616^2~524^2~4^2~414
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5f250e875a7ff176e82290c828496127dfa355b0;p=emacs.git

Remove duplicates from imenu

* eglot.el (eglot-imenu): Don't append the result list to itself,
  which causes duplicates.
---

diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index a234e17c0b1..2b39849f9bc 100644
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -1664,12 +1664,10 @@ If SKIP-SIGNATURE, don't try to send textDocument/signatureHelp."
               (jsonrpc-request (eglot--current-server-or-lose)
                                :textDocument/documentSymbol
                                `(:textDocument ,(eglot--TextDocumentIdentifier))))))
-        (append
-         (cl-remove nil
-                    (seq-group-by (lambda (e) (get-text-property 0 :kind (car e)))
-                                  entries)
-                    :key #'car)
-         entries))
+        (cl-remove nil
+                   (seq-group-by (lambda (e) (get-text-property 0 :kind (car e)))
+                                 entries)
+                   :key #'car))
     (funcall oldfun)))
 
 (defun eglot--apply-text-edits (edits &optional version)