[elpa] externals/ivy-hydra 829cf8a 212/395: ivy.el (ivy--done): Set ivy-text

[Basil L. Contovounesios]

branch: externals/ivy-hydra
commit 829cf8a55007df6318b1d34d150fc9aac6cc2f8a
Author: Kien Nguyen <kien.n.quang@gmail.com>
Commit: Oleh Krehel <ohwoeowho@gmail.com>

    ivy.el (ivy--done): Set ivy-text
    
    Fixes #2524
    Fixes #2526
---
 ivy.el | 15 ++++++++-------
 1 file changed, 8 insertions(+), 7 deletions(-)

diff --git a/ivy.el b/ivy.el
index 5149b77..0e97bdc 100644
--- a/ivy.el
+++ b/ivy.el
@@ -734,13 +734,14 @@ N is obtained from `ivy-more-chars-alist'."
   "Insert TEXT and exit minibuffer."
   (if (member (ivy-state-prompt ivy-last) '("Create directory: " "Make 
directory: "))
       (ivy-immediate-done)
-    (if (stringp text)
-        (insert
-         (setf (ivy-state-current ivy-last)
-               (if (and ivy--directory
-                        (not (eq (ivy-state-history ivy-last) 
'grep-files-history)))
-                   (expand-file-name text ivy--directory)
-                 text))))
+    (when (stringp text)
+      (insert
+       (setf (ivy-state-current ivy-last)
+             (if (and ivy--directory
+                      (not (eq (ivy-state-history ivy-last) 
'grep-files-history)))
+                 (expand-file-name text ivy--directory)
+               text)))
+      (ivy-set-text (ivy--input)))
     (setq ivy-exit 'done)
     (exit-minibuffer)))