summaryrefslogtreecommitdiff
path: root/frog-menu.el
diff options
context:
space:
mode:
Diffstat (limited to 'frog-menu.el')
-rw-r--r--frog-menu.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/frog-menu.el b/frog-menu.el
index f2d797c..441f618 100644
--- a/frog-menu.el
+++ b/frog-menu.el
@@ -759,7 +759,10 @@ RETURN will be the returned value if KEY is pressed."
(funcall cuhandler buf window)))
(when (eq res 'frog-menu--complete)
(setq res (frog-menu--complete prompt strings)))
- (cond ((eq convf #'car)
+ (cond ((and (eq convf #'car)
+ (stringp res)
+ (eq (get-text-property 0 'face res)
+ 'frog-menu-candidates-face))
(cdr (assoc res collection)))
(t res))))