branch: master
commit 3cc71f34dd4580ff919c43b6d0d75eb6dcbbadf7
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>

    * helm-async.el (helm-async-mode): ding when finish.
---
 helm-async.el |    4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)

diff --git a/helm-async.el b/helm-async.el
index 6966316..6d611a4 100644
--- a/helm-async.el
+++ b/helm-async.el
@@ -80,7 +80,9 @@ This allow to turn off async features provided to this 
package."
     "Notify mode-line that an async process run."
   :group 'helm-async
   :global t
-  :lighter " [Async job running]")
+  :lighter " [Async job running]"
+  (unless helm-async-mode
+    (let ((visible-bell t)) (ding))))
 
 (defun helm-async-mode-line-message (text &rest args)
   "Notify end of operation in `mode-line'."

Reply via email to