[elpa] externals/vertico ea9070e 1/3: vertico-directory-up: Expand tilde when going up from ~/ (#163)

[ELPA Syncer]

branch: externals/vertico
commit ea9070ebce93fcb14f3a7e15703bf345834812b3
Author: Masahiro Nakamura <13937915+tsuu32@users.noreply.github.com>
Commit: GitHub <noreply@github.com>

    vertico-directory-up: Expand tilde when going up from ~/ (#163)
---
 extensions/vertico-directory.el | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/extensions/vertico-directory.el b/extensions/vertico-directory.el
index f31f165..0e201e4 100644
--- a/extensions/vertico-directory.el
+++ b/extensions/vertico-directory.el
@@ -73,6 +73,9 @@
              (vertico-directory--completing-file-p))
     (save-excursion
       (goto-char (1- (point)))
+      (when (eq (char-before) ?~)
+        (delete-char -1)
+        (insert (expand-file-name "~")))
       (when (search-backward "/" (minibuffer-prompt-end) t)
         (delete-region (1+ (point)) (point-max))
         t))))