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

* mu4e.el: fix startup procedure, add doccount message

Browse Source
This commit is contained in:
djcb
2011-12-15 21:47:30 +02:00
parent 1d624ccf86
commit a32622c6be
1 changed files with 15 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

28
emacs/mu4e.el
View File

@ -337,20 +337,22 @@ in which case it will be equal to `:to'.)")
process, and start the main view if the 'pong' we receive from the process, and start the main view if the 'pong' we receive from the
server has the expected values." server has the expected values."
(interactive) (interactive)
(if (buffer-live-p mu4e-main-buffer-name) (if (buffer-live-p (get-buffer mu4e-main-buffer-name))
(switch-to-buffer mu4e-main-buffer-name) (switch-to-buffer mu4e-main-buffer-name)
(progn ;; explicit version checks are a bit questionable,
;; explicit version checks are a bit questionable, ;; better to check for specific features
;; better to check for specific features (if (< emacs-major-version 23)
(when (< emacs-major-version 23) (error "Emacs >= 23.x is required for mu4e")
(error "Emacs >= 23.x is required for mu4e")) (progn
(setq mu4e-proc-pong-func (setq mu4e-proc-pong-func
(lambda (version doccount) (lambda (version doccount)
(unless (string= version mu4e-mu-version) (unless (string= version mu4e-mu-version)
(error "mu server has version %s, but we need %s" (error "mu server has version %s, but we need %s"
version mu4e-mu-version)) version mu4e-mu-version))
(mu4e-main-view))) (mu4e-main-view)
(mu4e-proc-ping)))) (message "Started mu4e with %d message%s in store"
doccount (if (= doccount 1) "" "s"))))
(mu4e-proc-ping)))))
(defun mu4e-ask-maildir (prompt) (defun mu4e-ask-maildir (prompt)
"Ask the user for a shortcut (using PROMPT) as defined in "Ask the user for a shortcut (using PROMPT) as defined in