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

mu4e: handle foo> citation style

Browse Source 
Handle the citation style where the cited part is prefixed with
eg. "foo> " instead of the normal ">".

Also improve the default color scheme a bit.
This commit is contained in:
djcb
2016-07-10 21:44:02 +03:00
parent fc3b9c19da
commit 1945ab3bce
2 changed files with 7 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
mu4e/mu4e-vars.el
View File

@ -207,8 +207,10 @@ view buffer."
:type 'boolean
:group 'mu4e)
(defcustom mu4e-cited-regexp "^ *\\(\\(>+ ?\\)+\\)"
"Regular expression that determines whether a line is a citation."
(defcustom mu4e-cited-regexp "^\\(\\([[:alpha:]]+\\)\\|\\( *\\)\\)\\(\\(>+ ?\\)+\\)"
"Regular expression that determines whether a line is a
citation. This recognizes lines starting with numbers of '>'
and spaces as well as citations of the type \"John> ... \"."
:type 'string
:group 'mu4e)
@ -564,7 +566,7 @@ I.e. a message with the draft flag set."
:group 'mu4e-faces)
(defface mu4e-cited-2-face
'((t :inherit font-lock-type-face :bold nil :italic t))
'((t :inherit font-lock-preprocessor-face :bold nil :italic t))
"Face for cited message parts (level 2)."
:group 'mu4e-faces)
@ -589,7 +591,7 @@ I.e. a message with the draft flag set."
:group 'mu4e-faces)
(defface mu4e-cited-7-face
'((t :inherit font-lock-preprocessor-face :bold nil :italic t))
'((t :inherit font-lock-type-face :bold nil :italic t))
"Face for cited message parts (level 7)."
:group 'mu4e-faces)