branch: master
commit 5b0f1c8ef7267d161a6eba5003f48317bda1c4e0
Author: Dmitry Gutov <dgu...@yandex.ru>
Commit: Dmitry Gutov <dgu...@yandex.ru>
company-search-delete-char: Use `ding'
---
company.el | 3 ++-
1 files changed, 2 insertions(+), 1 deletions(-)
diff --git a/company.el b/company.el
index be94743..8b8f6ca 100644
--- a/company.el
+++ b/company.el
@@ -1668,7 +1668,8 @@ from the rest of the back-ends in the group, if any, will
be left at the end."
(defun company-search-delete-char ()
(interactive)
(company--search-assert-enabled)
- (unless (string= company-search-string "")
+ (if (string= company-search-string "")
+ (ding)
(let ((ss (substring company-search-string 0 -1)))
(when company-search-filtering
(company--search-update-predicate ss))
