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

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

[elpa] master 1365b2b 031/272: Change tramp prompt from "Find File: " to


From: Oleh Krehel
Subject: [elpa] master 1365b2b 031/272: Change tramp prompt from "Find File: " to "address@hidden: "
Date: Mon, 25 Apr 2016 10:13:15 +0000

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

    Change tramp prompt from "Find File: " to "address@hidden: "
---
 ivy.el |   10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/ivy.el b/ivy.el
index 3e93d76..30142d1 100644
--- a/ivy.el
+++ b/ivy.el
@@ -500,7 +500,7 @@ When ARG is t, exit with current text, ignoring the 
candidates."
          (setq res (cl-delete-duplicates res :test #'equal))
          (let* ((old-ivy-last ivy-last)
                 (enable-recursive-minibuffers t)
-                (host (ivy-read "Find File: "
+                (host (ivy-read "address@hidden: "
                                 (mapcar #'ivy-build-tramp-name res)
                                 :initial-input rest)))
            (setq ivy-last old-ivy-last)
@@ -1708,10 +1708,10 @@ Should be run via minibuffer `post-command-hook'."
              (if (string-match "/\\'" ivy-text)
                  (if (member ivy-text ivy--all-candidates)
                      (ivy--cd (expand-file-name ivy-text ivy--directory))
-                     (when (string-match "//\\'" ivy-text)
-                       (if (and default-directory
-                                (string-match "\\`[[:alpha:]]:/" 
default-directory))
-                           (ivy--cd (match-string 0 default-directory))
+                   (when (string-match "//\\'" ivy-text)
+                     (if (and default-directory
+                              (string-match "\\`[[:alpha:]]:/" 
default-directory))
+                         (ivy--cd (match-string 0 default-directory))
                        (ivy--cd "/")))
                    (when (string-match "[[:alpha:]]:/$" ivy-text)
                      (let ((drive-root (match-string 0 ivy-text)))



reply via email to

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