branch: master
commit b311374bfc5e359c0ca31b804b1c1c1fe579dcc3
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>
* 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))))
