[elpa] master b311374 092/187: * dired-async.el (dired-async-mode): Notify number of jobs running in lighter.

[Michael Albinus]

branch: master
commit b311374bfc5e359c0ca31b804b1c1c1fe579dcc3
Author: Thierry Volpiatto <address@hidden>
Commit: Thierry Volpiatto <address@hidden>

    * dired-async.el (dired-async-mode): Notify number of jobs running in 
lighter.
---
 dired-async.el |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/dired-async.el b/dired-async.el
index 239144b..dec88ed 100644
--- a/dired-async.el
+++ b/dired-async.el
@@ -91,7 +91,8 @@ This allow to turn off async features provided to this 
package."
     "Notify mode-line that an async process run."
   :group 'dired-async
   :global t
-  :lighter (:eval (propertize " [Async job running]"
+  :lighter (:eval (propertize (format " [%s Async job(s) running]"
+                                      (length (dired-async-processes)))
                               'face 'dired-async-mode-message))
   (unless dired-async-mode
     (let ((visible-bell t)) (ding))))