[Top][All Lists]

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

[elpa] master 4f12a59 196/399: counsel.el (counsel-find-file-mkdir-actio

From: Oleh Krehel
Subject: [elpa] master 4f12a59 196/399: counsel.el (counsel-find-file-mkdir-action): Add trailing "/"
Date: Sat, 20 Jul 2019 14:57:22 -0400 (EDT)

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

    counsel.el (counsel-find-file-mkdir-action): Add trailing "/"
    Re #2053
 counsel.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/counsel.el b/counsel.el
index fc44e31..c74bf81 100644
--- a/counsel.el
+++ b/counsel.el
@@ -1777,7 +1777,8 @@ choose between `yes-or-no-p' and `y-or-n-p'; otherwise 
default to
 (defun counsel-find-file-mkdir-action (_x)
   "Create a directory from `ivy-text'."
-  (let ((dir (expand-file-name ivy-text ivy--directory))
+  (let ((dir (file-name-as-directory
+              (expand-file-name ivy-text ivy--directory)))
         (win (and (not (eq ivy-exit 'done))
     (make-directory dir)

reply via email to

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