Mu4e: make msg compose advice more transparent
... to functions that call the original function
This commit is contained in:
parent
3c0df378a6
commit
089b4e6b04
1 changed files with 2 additions and 2 deletions
|
@ -245,11 +245,11 @@ Usefull for affecting HTML export config.")
|
||||||
(setq +mu4e-compose-org-msg-toggle-next
|
(setq +mu4e-compose-org-msg-toggle-next
|
||||||
(not +mu4e-compose-org-msg-toggle-next))))
|
(not +mu4e-compose-org-msg-toggle-next))))
|
||||||
|
|
||||||
(defadvice! mu4e-maybe-toggle-org-msg (orig-fn toggle-p)
|
(defadvice! mu4e-maybe-toggle-org-msg (orig-fn &optional toggle-p)
|
||||||
:around #'mu4e-compose-new
|
:around #'mu4e-compose-new
|
||||||
:around #'mu4e-compose-reply
|
:around #'mu4e-compose-reply
|
||||||
(interactive "p")
|
(interactive "p")
|
||||||
(mu4e-compose-org-msg-handle-toggle (/= 1 toggle-p))
|
(mu4e-compose-org-msg-handle-toggle (/= 1 (or toggle-p 0)))
|
||||||
(funcall orig-fn))
|
(funcall orig-fn))
|
||||||
|
|
||||||
(defvar +org-msg-accent-color "#c01c28"
|
(defvar +org-msg-accent-color "#c01c28"
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue