I just now tested this, and it works fine.
Thank you again!
(unless (member mu4e-compose-type '(edit resend))
(save-excursion
(save-restriction
(widen)
(cond
((eq mu4e-compose-type 'new)
(message-goto-body)
(kill-region (point) (point-max)))
((message-goto-signature)
(forward-line -2)
(kill-region (point) (point-max))
)
)
(message-goto-body)
(insert "\n")
(narrow-to-region (point-min) (point))
(let ((message-signature t)
(mu4e-compose-signature t)
(mu4e-compose-signature-auto-include t))
(message-insert-signature))
(when (member mu4e-compose-type '(forward reply))
(goto-char (point-max))
(insert "\n"))
)
)
)
(save-restriction
(message-narrow-to-headers)
(unless (re-search-forward "^.+?:\\s-*$" nil t)
(message-goto-body)))
In order to put the signature above the quoted text, I now am able to do that by putting the following code into my `mu4e-compose-mode-hook' ...
...
This assumes that I have already initialized `message-signature', `mu4e-compose-signature', and `mu4e-compose-signature-auto-include' to nil.
Are you sure this still works? mu4e-compose-type is always nil for me.