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

Merge pull request #906 from Chris00/context

Browse Source 
mu4e: Add a face for displaying the context in the mode-line
This commit is contained in:
Dirk-Jan C. Binnema
2016-08-13 09:15:21 +03:00
committed by GitHub
parent 8235a903c4 cec66211f5
commit 14a5f2d7ca
3 changed files with 7 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
mu4e/mu4e-compose.el
View File

@ -149,7 +149,7 @@ Also see `mu4e-context-policy'."
We have the following choices: We have the following choices:
- `sign': sign the reply - `sign': sign the reply
- `sign-and-encrypt': sign and encrypt the repy - `sign-and-encrypt': sign and encrypt the reply
- `encrypt': encrypt the reply, but don't sign it. - `encrypt': encrypt the reply, but don't sign it.
- anything else: do nothing." - anything else: do nothing."
:type '(choice :type '(choice

2
mu4e/mu4e-context.el
View File

@ -47,7 +47,7 @@ describing mu4e's contexts.")
(if (mu4e-context-current) (if (mu4e-context-current)
(concat "[" (propertize (mu4e~quote-for-modeline (concat "[" (propertize (mu4e~quote-for-modeline
(mu4e-context-name (mu4e-context-current))) (mu4e-context-name (mu4e-context-current)))
'face 'mu4e-title-face) "]") "")) 'face 'mu4e-context-face) "]") ""))
(defstruct mu4e-context (defstruct mu4e-context
"A mu4e context object with the following members: "A mu4e context object with the following members:

5
mu4e/mu4e-vars.el
View File

@ -583,6 +583,11 @@ I.e. a message with the draft flag set."
"Face for a header title in the headers view." "Face for a header title in the headers view."
:group 'mu4e-faces) :group 'mu4e-faces)
(defface mu4e-context-face
'((t :inherit mu4e-title-face :bold t))
"Face for displaying the context in the modeline."
:group 'mu4e-faces)
(defface mu4e-modeline-face (defface mu4e-modeline-face
'((t :inherit font-lock-string-face :bold t)) '((t :inherit font-lock-string-face :bold t))
"Face for the query in the mode-line." "Face for the query in the mode-line."