Mu4e: make msg compose advice more transparent

... to functions that call the original function
This commit is contained in:
TEC 2020-10-31 19:09:45 +08:00
parent 3c0df378a6
commit 089b4e6b04
No known key found for this signature in database
GPG key ID: 779591AFDB81F06C

View file

@ -245,11 +245,11 @@ Usefull for affecting HTML export config.")
(setq +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-reply
(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))
(defvar +org-msg-accent-color "#c01c28"