[Top][All Lists]

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

[elpa] externals/marginalia f0e8a73: Check completion-extra-properties i

From: ELPA Syncer
Subject: [elpa] externals/marginalia f0e8a73: Check completion-extra-properties in marginalia-cycle
Date: Wed, 14 Jul 2021 04:57:13 -0400 (EDT)

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

    Check completion-extra-properties in marginalia-cycle
    This allows to cycle to the builtin completion in region annotator
 marginalia.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/marginalia.el b/marginalia.el
index 598e71c..4b9f514 100644
--- a/marginalia.el
+++ b/marginalia.el
@@ -821,7 +821,9 @@ Remember `this-command' for 
           ;; metadata since we must bypass the 
`marginalia--completion-metadata-get' advice.
           (when (and (eq (cadr cat) 'builtin)
                      (not (assq 'annotation-function metadata))
-                     (not (assq 'affixation-function metadata)))
+                     (not (assq 'affixation-function metadata))
+                     (not (plist-get completion-extra-properties 
+                     (not (plist-get completion-extra-properties 
             (setcdr cat (append (cddr cat) (list (cadr cat)))))
           (message "Marginalia: Use annotator `%s' for category `%s'" (cadr 
cat) (car cat))))
     (user-error "Marginalia: No active minibuffer")))

reply via email to

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