alx/mu4e
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

* mu4e-hdrs.el: display # of matches in echo area

Browse Source
This commit is contained in:
djcb
2012-03-28 19:00:10 +03:00
parent ad0c315c02
commit 7cf551a070
1 changed files with 10 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
emacs/mu4e-hdrs.el
View File

@ -231,22 +231,21 @@ after the end of the search results."
(with-current-buffer mu4e-hdrs-buffer (with-current-buffer mu4e-hdrs-buffer
(save-excursion (save-excursion
(goto-char (point-max)) (goto-char (point-max))
(let ((inhibit-read-only t)) (let ((inhibit-read-only t)
(insert (propertize (str (if (= 0 count)
(case count "No matching messages found"
(0 "No matching messages found") "End of search results")))
;; note, don't show the number so we don't have to update it (insert (propertize str 'face 'mu4e-system-face 'intangible t))
;; when we delete messsages... (unless (= 0 count)
(otherwise "End of search results")) (message "Found %d matching message%s"
;; (1 "Found 1 message") count (if (= 1 count) "" "s")))))))
;; (otherwise (format "Found %d messages" count)))
'face 'mu4e-system-face 'intangible t))))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; hdrs-mode and mode-map ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; hdrs-mode and mode-map ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defvar mu4e-hdrs-mode-map nil (defvar mu4e-hdrs-mode-map nil
"Keymap for *mu4e-headers* buffers.") "Keymap for *mu4e-headers* buffers.")