mirror of https://github.com/djcb/mu.git
mu4e-draft: better sender in list-reply dialog
Don't show the raw lisp object.
This commit is contained in:
parent
040d74a326
commit
5e63b8bed3
|
@ -606,12 +606,13 @@ mailing-list."
|
|||
(recipnum
|
||||
(+ (length (mu4e~draft-create-to-lst origmsg))
|
||||
(length (mu4e~draft-create-cc-lst origmsg t t))))
|
||||
(sender (mu4e-contact-full (car from)))
|
||||
(reply-type
|
||||
(mu4e-read-option
|
||||
"Reply to mailing-list "
|
||||
`( (,(format "all %d recipient(s)" recipnum) . all)
|
||||
(,(format "list-only (%s)" (cdar list-post)) . list-only)
|
||||
(,(format "sender-only (%s)" (cdar from)) . sender-only)))))
|
||||
`( (,(format "all %d recipient(s)" recipnum) . all)
|
||||
(,(format "list-only (%s)" (cdar list-post)) . list-only)
|
||||
(,(format "sender-only (%s)" sender) . sender-only)))))
|
||||
(cl-case reply-type
|
||||
(all
|
||||
(concat
|
||||
|
|
Loading…
Reference in New Issue