djm
/
dotfiles
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix vertico-directory functions

This commit is contained in:
David Morgan 2022-07-19 16:04:29 +01:00
parent 5ca6bcbcc3
commit 679c36f7ec
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
.emacs.d/lisp/init-minibuffer.el
View File

@ -111,13 +111,13 @@ DEFS is a plist associating completion categories to commands."
(interactive)
(if (and (>= vertico--index 0)
(string-suffix-p "/" (vertico--candidate))
(vertico-directory--completing-file-p))
(eq 'file (vertico--metadata-get 'category)))
(vertico-insert)
(insert "/")))
(defun vertico-directory-home ()
(interactive)
(if (and (string-suffix-p "/" (vertico--candidate))
(vertico-directory--completing-file-p))
(eq 'file (vertico--metadata-get 'category)))
(insert "~/")
(insert "~")))
(defun read-project (orig &rest args)