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

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

[elpa] master e91a4eb 31/63: ivy.el (ivy-dispatching-done): Display the


From: Oleh Krehel
Subject: [elpa] master e91a4eb 31/63: ivy.el (ivy-dispatching-done): Display the candidate
Date: Fri, 21 Aug 2015 12:08:39 +0000

branch: master
commit e91a4ebc6b2d353e8e046501c39f7ee836aa89de
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    ivy.el (ivy-dispatching-done): Display the candidate
---
 ivy.el |   20 +++++++++++---------
 1 files changed, 11 insertions(+), 9 deletions(-)

diff --git a/ivy.el b/ivy.el
index 5f8e5de..bd11501 100644
--- a/ivy.el
+++ b/ivy.el
@@ -275,15 +275,17 @@ When non-nil, it should contain one %d.")
   (let ((actions (ivy-state-action ivy-last)))
     (if (null (ivy--actionp actions))
         (ivy-done)
-      (let* ((hint (mapconcat
-                    (lambda (x)
-                      (format "%s: %s"
-                              (propertize
-                               (car x)
-                               'face 'font-lock-builtin-face)
-                              (nth 2 x)))
-                    (cdr actions)
-                    "\n"))
+      (let* ((hint (concat ivy--current
+                           "\n"
+                           (mapconcat
+                            (lambda (x)
+                              (format "%s: %s"
+                                      (propertize
+                                       (car x)
+                                       'face 'font-lock-builtin-face)
+                                      (nth 2 x)))
+                            (cdr actions)
+                            "\n")))
              (key (string (read-key hint)))
              (action (assoc key (cdr actions))))
         (cond ((string= key ""))



reply via email to

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