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

mu4e: add some support for the mux backend

Browse Source
This commit is contained in:
djcb
2018-02-11 11:44:31 +02:00
parent 0fe234c3ba
commit aef46ec14f
2 changed files with 38 additions and 36 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
mu4e/mu4e-main.el
View File

@ -126,7 +126,8 @@ clicked."
(propertize (propertize
(concat (concat
(when (plist-get mu4e~server-props :crypto) "C") (when (plist-get mu4e~server-props :crypto) "C")
(when (plist-get mu4e~server-props :guile) "G")) (when (plist-get mu4e~server-props :guile) "G")
(when (plist-get mu4e~server-props :mux) "X"))
'face 'mu4e-title-face) 'face 'mu4e-title-face)
"\n\n" "\n\n"

5
mu4e/mu4e-utils.el
View File

@ -800,8 +800,9 @@ This is used by the completion function in mu4e-compose."
(unless (>= emacs-major-version 23) (unless (>= emacs-major-version 23)
(mu4e-error "Emacs >= 23.x is required for mu4e")) (mu4e-error "Emacs >= 23.x is required for mu4e"))
(when mu4e~server-props (when mu4e~server-props
(let ((version (plist-get mu4e~server-props :version))) (let ((version (plist-get mu4e~server-props :version))
(unless (string= version mu4e-mu-version) (mux (plist-get mu4e~server-props :mux)))
(unless (or (string= version mu4e-mu-version) mux)
(mu4e-error "mu server has version %s, but we need %s" (mu4e-error "mu server has version %s, but we need %s"
version mu4e-mu-version)))) version mu4e-mu-version))))
(unless (and mu4e-mu-binary (file-executable-p mu4e-mu-binary)) (unless (and mu4e-mu-binary (file-executable-p mu4e-mu-binary))