martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Improve messaging in ecomplete-remove

Browse Source 
* lisp/ecomplete.el (ecomplete-remove): Make messaging better.
This commit is contained in:
Lars Ingebrigtsen
2022-10-03 21:40:27 +02:00
parent 8ef8da13f6
commit 129fcb3d38
1 changed files with 11 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
lisp/ecomplete.el
View File

@@ -314,12 +314,17 @@ non-nil and there is only a single completion option available."
(elems (seq-filter (lambda (elem)
(string-match-p match (car elem)))
data)))
(when (yes-or-no-p (format "Delete %s matching ecomplete entries? "
(length elems)))
(dolist (elem elems)
(ecomplete--remove-item type (car elem)))
(ecomplete-save)
(message "Deleted entries"))))
(if (length= elems 0)
(message "No matching entries for %s" match)
(when (yes-or-no-p (format "Delete %s matching ecomplete %s? "
(length elems)
(if (length= elems 1)
"entry"
"entries")))
(dolist (elem elems)
(ecomplete--remove-item type (car elem)))
(ecomplete-save)
(message "Deleted entries")))))
(provide 'ecomplete)