emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

fix(lib): remove-recent-file: improve completion UI

Browse source 
Integrates with completion frameworks (particularly vertico) that read
capf metadata.
This commit is contained in:
Henrik Lissner 2024-04-06 12:37:10 -04:00
parent a3de6ad04f
commit 4f51652111
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
1 changed files with 10 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

12
lisp/lib/files.el
View file

@ -561,9 +561,17 @@ which case it will save it without prompting."
(defun doom/remove-recent-file (file) (defun doom/remove-recent-file (file)
"Remove FILE from your recently-opened-files list." "Remove FILE from your recently-opened-files list."
(interactive (interactive
(list (completing-read "Remove recent file: " recentf-list (list (completing-read "Remove recent file: "
(lambda (string predicate action)
(if (eq action 'metadata)
'(metadata
(display-sort-function . identity)
(cycle-sort-function . identity)
(category . file))
(complete-with-action
action recentf-list string predicate)))
nil t))) nil t)))
(setq recentf-list (delete file recentf-list)) (setq recentf-list (delete (recentf-expand-file-name file) recentf-list))
(recentf-save-list) (recentf-save-list)
(message "Removed %S from `recentf-list'" (abbreviate-file-name file))) (message "Removed %S from `recentf-list'" (abbreviate-file-name file)))