Fix vertico-directory functions
This commit is contained in:
parent
5ca6bcbcc3
commit
679c36f7ec
|
@ -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)
|
||||
|
|
Loading…
Reference in New Issue