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

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

[elpa] master 5229ebe 173/272: counsel.el (counsel-prompt-function-dir):


From: Oleh Krehel
Subject: [elpa] master 5229ebe 173/272: counsel.el (counsel-prompt-function-dir): Fix format
Date: Mon, 25 Apr 2016 10:13:24 +0000

branch: master
commit 5229ebeeebdac8cb90ba0f7322e6cf3958d3e28d
Author: justbur <address@hidden>
Commit: Oleh Krehel <address@hidden>

    counsel.el (counsel-prompt-function-dir): Fix format
    
    The prompt argument was unused, which looked unintentional
    
    Fixes #425
---
 counsel.el |    9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/counsel.el b/counsel.el
index 49b0440..26d4b83 100644
--- a/counsel.el
+++ b/counsel.el
@@ -179,12 +179,13 @@ Update the minibuffer with the amount of lines collected 
every
 (defun counsel-prompt-function-dir (prompt)
   "Return PROMPT appended with the parent directory."
   (let ((directory counsel--git-grep-dir))
-    (format " [%s]: "
+    (format "%s [%s]: "
+            prompt
             (let ((dir-list (eshell-split-path directory)))
               (if (> (length dir-list) 3)
-                 (apply #'concat
-                        (append '("...")
-                                (cl-subseq dir-list (- (length dir-list) 3))))
+                  (apply #'concat
+                         (append '("...")
+                                 (cl-subseq dir-list (- (length dir-list) 3))))
                 directory)))))
 
 (defun counsel-delete-process ()



reply via email to

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