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

mu4e-maildir-shortcuts: define custom type

This commit is contained in:
Jonas Bernoulli 2012-12-12 20:04:23 +01:00
parent faa0e6f55f
commit cd5f730222
2 changed files with 13 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
mu4e/mu4e-utils.el
View File

@ -280,8 +280,8 @@ the list of maildirs will not change until you restart mu4e."
"Ask the user for a shortcut (using PROMPT) as defined in "Ask the user for a shortcut (using PROMPT) as defined in
`mu4e-maildir-shortcuts', then return the corresponding folder `mu4e-maildir-shortcuts', then return the corresponding folder
name. If the special shortcut 'o' (for _o_ther) is used, or if name. If the special shortcut 'o' (for _o_ther) is used, or if
`mu4e-maildir-shortcuts is not defined, let user choose from all `mu4e-maildir-shortcuts' is not defined, let user choose from all
maildirs under `mu4e-maildir." maildirs under `mu4e-maildir'."
(let ((prompt (mu4e-format "%s" prompt))) (let ((prompt (mu4e-format "%s" prompt)))
(if (not mu4e-maildir-shortcuts) (if (not mu4e-maildir-shortcuts)
(ido-completing-read prompt (mu4e-get-maildirs)) (ido-completing-read prompt (mu4e-get-maildirs))

20
mu4e/mu4e-vars.el
View File

@ -293,15 +293,17 @@ re-edited, and is nil otherwise."
(defcustom mu4e-maildir-shortcuts nil (defcustom mu4e-maildir-shortcuts nil
"A list of maildir shortcuts to enable quickly going to the "A list of maildir shortcuts.
particular for, or quickly moving messages towards them (i.e., This enables quickly going to the particular for, or quickly
archiving or refiling). The list contains elements of the form moving messages towards them (i.e., archiving or refiling). The
\(maildir . shortcut), where MAILDIR is a maildir (such as list contains elements of the form (maildir . shortcut), where
\"/archive/\"), and shortcut a single shortcut character. With MAILDIR is a maildir (such as \"/archive/\"), and shortcut a
this, in the header buffer and view buffer you can execute single shortcut character. With this, in the header buffer and
`mu4e-mark-for-move-quick' (or 'm', by default) or view buffer you can execute `mu4e-mark-for-move-quick' (or 'm',
`mu4e-jump-to-maildir' (or 'j', by default), followed by the by default) or `mu4e-jump-to-maildir' (or 'j', by default),
designated shortcut character for the maildir.") followed by the designated shortcut character for the maildir."
:type '(repeat (cons (string :tag "Maildir") character))
:group 'mu4e-folders)
;; Faces ;; Faces
(defgroup mu4e-faces nil (defgroup mu4e-faces nil