Function: feedmail-queue-reminder-brief
feedmail-queue-reminder-brief is an interactive and byte-compiled
function defined in feedmail.el.gz.
Signature
(feedmail-queue-reminder-brief)
Documentation
Brief display of draft and queued message counts in minibuffer.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/mail/feedmail.el.gz
(defun feedmail-queue-reminder-brief ()
"Brief display of draft and queued message counts in minibuffer."
(interactive)
(feedmail-say-debug ">in-> feedmail-queue-reminder-brief")
(let (q-cnt d-cnt q-lis d-lis)
(setq q-lis (feedmail-look-at-queue-directory feedmail-queue-directory))
(setq d-lis (feedmail-look-at-queue-directory feedmail-queue-draft-directory))
(setq q-cnt (car q-lis))
(setq d-cnt (car d-lis))
(if (or (> q-cnt 0) (> d-cnt 0))
(progn
(message "FQM: [D: %d, Q: %d]" d-cnt q-cnt))))
)