From 37c7bb35638e841f5780a9360c81a4e7a994458b Mon Sep 17 00:00:00 2001 From: David Morgan Date: Thu, 19 Aug 2021 14:16:58 +0100 Subject: Add vertico-directory-slash --- .emacs.d/lisp/init-completion.el | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) (limited to '.emacs.d/lisp/init-completion.el') diff --git a/.emacs.d/lisp/init-completion.el b/.emacs.d/lisp/init-completion.el index b034405..5136210 100644 --- a/.emacs.d/lisp/init-completion.el +++ b/.emacs.d/lisp/init-completion.el @@ -157,10 +157,18 @@ ;; See init-packages.el for fetching of Vertico Extenions ;; Required extensions must be in the vertico-extensions var (use-package vertico-directory + :config + (defun vertico-directory-slash () + (interactive) + (if (and (>= vertico--index 0) + (string-suffix-p "/" (vertico--candidate)) + (vertico-directory--completing-file-p)) + (vertico-insert) + (insert "/"))) :load-path vertico-extensions-dir :bind (:map vertico-map ("RET" . vertico-directory-enter) - ;("/" . vertico-directory-enter) + ("/" . vertico-directory-slash) ("DEL" . vertico-directory-delete-char) ("M-DEL" . vertico-directory-delete-word)) ;; Tidy shadowed file names -- cgit 1.4.1-2-gfad0