diff options
author | David Morgan <djm_uk@protonmail.com> | 2022-07-19 16:04:29 +0100 |
---|---|---|
committer | David Morgan <djm_uk@protonmail.com> | 2022-07-19 16:04:29 +0100 |
commit | 679c36f7ec6417487d84fe13922a25e25df059ca (patch) | |
tree | d9eaabb2a48d65d2c911c18cb96373ef31c01ac3 /.emacs.d/lisp | |
parent | 5ca6bcbcc3489885960953cadca7a125a2eb8165 (diff) | |
download | dotfiles-679c36f7ec6417487d84fe13922a25e25df059ca.tar.gz |
Fix vertico-directory functions
Diffstat (limited to '.emacs.d/lisp')
-rw-r--r-- | .emacs.d/lisp/init-minibuffer.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/.emacs.d/lisp/init-minibuffer.el b/.emacs.d/lisp/init-minibuffer.el index 56b9586..5245ba9 100644 --- a/.emacs.d/lisp/init-minibuffer.el +++ b/.emacs.d/lisp/init-minibuffer.el @@ -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) |