emacs
/
mu
mirror of https://github.com/djcb/mu.git
1
0
Fork 0
Code Issues Releases Wiki Activity

* mu4e-main: fix the main menu regexps

This commit is contained in:
djcb 2014-01-25 20:03:37 -08:00
parent 1bd332fba1
commit 5a066de5ff
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
mu4e/mu4e-main.el
View File

@ -77,7 +77,7 @@ a string, execute the corresponding keyboard action when it is
clicked."
(let ((newstr
(replace-regexp-in-string
"\\[\\(.\\)\\]"
"\\[\\(..?\\)\\]"
(lambda(m)
(format "[%s]"
(propertize (match-string 1 m) 'face 'mu4e-highlight-face)))
@ -92,7 +92,7 @@ clicked."
(define-key map [mouse-2] func)
(define-key map (kbd "RET") func)
(put-text-property 0 (length newstr) 'keymap map newstr)
(put-text-property (string-match "\\w" newstr)
(put-text-property (string-match "\\[.+" newstr)
(- (length newstr) 1) 'mouse-face 'highlight newstr) newstr))