emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/consult a294f16263: Support more types in consult-imenu


From: ELPA Syncer
Subject: [elpa] externals/consult a294f16263: Support more types in consult-imenu--normalize
Date: Wed, 13 Sep 2023 06:57:31 -0400 (EDT)

branch: externals/consult
commit a294f162632767e8950ec9758b123c29b46c03af
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Support more types in consult-imenu--normalize
---
 consult-imenu.el | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/consult-imenu.el b/consult-imenu.el
index d1b073b930..d127931026 100644
--- a/consult-imenu.el
+++ b/consult-imenu.el
@@ -64,17 +64,14 @@ ARGS are the arguments to the special item function."
 (defun consult-imenu--normalize (pos)
   "Return normalized imenu POS."
   (pcase pos
-    ;; Simple marker item
-    ((pred markerp) nil)
-    ;; Simple integer item
+    ;; Create marker from integer item
     ((pred integerp) (setq pos (copy-marker pos)))
     ;; Semantic uses overlay for positions
     ((pred overlayp) (setq pos (copy-marker (overlay-start pos))))
     ;; Wrap special item
     (`(,pos ,fn . ,args)
      (setq pos `(,pos ,#'consult-imenu--switch-buffer ,(current-buffer)
-                      ,fn ,@args)))
-    (_ (error "Unknown imenu item: %S" pos)))
+                      ,fn ,@args))))
   (if (or (consp pos)
           (eq imenu-default-goto-function #'imenu-default-goto-function))
       pos



reply via email to

[Prev in Thread] Current Thread [Next in Thread]