* fix the mu4e-read-option callers
This commit is contained in:
@ -265,12 +265,12 @@ are more than 1 (based on ORIGMSG)."
|
|||||||
(length (mu4e~compose-create-cc-lst origmsg t))))
|
(length (mu4e~compose-create-cc-lst origmsg t))))
|
||||||
(response
|
(response
|
||||||
(if (= recipnum 1)
|
(if (= recipnum 1)
|
||||||
?a ;; with one recipient, we can reply to 'all'....
|
'all ;; with one recipient, we can reply to 'all'....
|
||||||
(mu4e-read-option
|
(mu4e-read-option
|
||||||
"Reply to "
|
"Reply to "
|
||||||
`( (,(format "all %d recipients" recipnum) . 'all)
|
`( (,(format "all %d recipients" recipnum) . all)
|
||||||
("sender only" . 'sender-only))))))
|
("sender only" . sender-only))))))
|
||||||
(= response 'all)))
|
(eq response 'all)))
|
||||||
|
|
||||||
(defun mu4e~compose-message-filename-construct (&optional flagstr)
|
(defun mu4e~compose-message-filename-construct (&optional flagstr)
|
||||||
"Construct a randomized name for a message file with flags FLAGSTR; it looks
|
"Construct a randomized name for a message file with flags FLAGSTR; it looks
|
||||||
|
|||||||
@ -938,7 +938,7 @@ rerun the last search with the new parameters."
|
|||||||
'(("ascending" . nil) ("descending" . t)))))
|
'(("ascending" . nil) ("descending" . t)))))
|
||||||
(setq
|
(setq
|
||||||
mu4e-headers-sortfield sortfield
|
mu4e-headers-sortfield sortfield
|
||||||
mu4e-headers-sort-revert revert)
|
mu4e-headers-sort-revert revert) ;; "descending" means "revert"
|
||||||
(when rerun
|
(when rerun
|
||||||
(mu4e-headers-rerun-search))))
|
(mu4e-headers-rerun-search))))
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user