[Top][All Lists]

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

[elpa] master 2db2c51 050/184: counsel.el (counsel-find-file-mkdir-actio

From: Oleh Krehel
Subject: [elpa] master 2db2c51 050/184: counsel.el (counsel-find-file-mkdir-action): make parents too
Date: Wed, 16 Oct 2019 13:14:47 -0400 (EDT)

branch: master
commit 2db2c510572eadbc2e0ec851a1c739e7e7906d6d
Author: David Ringo <address@hidden>
Commit: David Ringo <address@hidden>

    counsel.el (counsel-find-file-mkdir-action): make parents too
 counsel.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/counsel.el b/counsel.el
index d976ae0..5bd149a 100644
--- a/counsel.el
+++ b/counsel.el
@@ -1833,12 +1833,12 @@ 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'."
+  "Create a directory and any nonexistent parent dirs from `ivy-text'."
   (let ((dir (file-name-as-directory
               (expand-file-name ivy-text ivy--directory)))
         (win (and (not (eq ivy-exit 'done))
-    (make-directory dir)
+    (make-directory dir t)
     (when win (with-selected-window win (ivy--cd dir)))))

reply via email to

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