[elpa] master 6067454 068/348: Improve readability of imenu candidates

[Oleh Krehel]

branch: master
commit 6067454379b4d81fffb24e613f793dd51e911654
Author: justbur <jus...@burkett.cc>
Commit: justbur <jus...@burkett.cc>

    Improve readability of imenu candidates
    
    * counsel.el (counsel-imenu-get-candidates-from): Improve readability
---
 counsel.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/counsel.el b/counsel.el
index 8f93420..cffc627 100644
--- a/counsel.el
+++ b/counsel.el
@@ -1947,7 +1947,12 @@ PREFIX is used to create the key."
                          (cons e (if (integerp v) (copy-marker v) v)))
                     ;; pass the prefix to next recursive call
                     (concat prefix (if prefix ".") (car elm)))
-                 (let ((key (concat prefix (if prefix ".") (car elm))))
+                 (let ((key (concat
+                             (when prefix
+                               (concat
+                                (propertize prefix 'face 'compilation-info)
+                                ": "))
+                             (car elm))))
                    (list (cons key
                                ;; create a imenu candidate here
                                (cons key (if (overlayp (cdr elm))