diff options
| author | jao <jao@gnu.org> | 2020-07-10 14:03:51 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2020-07-10 14:03:51 +0100 |
| commit | d5aeb0de1b95f792a31efb26d89d61d8439d6dce (patch) | |
| tree | 19df343cb4bf5dce8258f7bf0c9116bbff70d13b /net | |
| parent | fb2e0aad62a9497f048247d536ce8212e1b77bb1 (diff) | |
| download | elibs-d5aeb0de1b95f792a31efb26d89d61d8439d6dce.tar.gz elibs-d5aeb0de1b95f792a31efb26d89d61d8439d6dce.tar.bz2 | |
maildir: adjustments in formatting
Diffstat (limited to 'net')
| -rw-r--r-- | net/jao-maildir.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/net/jao-maildir.el b/net/jao-maildir.el index 8b0f6c9..bedaa7f 100644 --- a/net/jao-maildir.el +++ b/net/jao-maildir.el @@ -57,12 +57,13 @@ (a (cdr (assoc m jao-maildir-tracked-maildirs)))) (when (null a) (setq total (+ n total))) (when a (push (format "%s%s" a n) counts))))) - (let ((total (if (> total 0) (format " %d " total) " ")) - (s (propertize (mapconcat 'identity counts " ") - 'face 'font-lock-function-name-face))) + (let* ((total (if (> total 0) (format " %d " total) " ")) + (s (propertize (mapconcat 'identity counts " ") + 'face 'font-lock-function-name-face)) + (s (if (string-empty-p s) s (concat s " ")))) (setq jao-maildir-mode-line-string (format "%s%s" total s)) (when (and jao-maildir-echo-p (not (string-empty-p s))) - (message "%s" s)) + (message "Mail%s" s)) (force-mode-line-update t)))) (defvar jao-maildir--watches nil) |