From 84fe4866605ae47cdfe7059fad0c3ace7d324a68 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sun, 20 Feb 2022 13:45:56 +0100 Subject: [PATCH] Fix compilation warning in previous sendmail.el change * lisp/mail/sendmail.el (mm-long-lines-p): Fix compilation warning. --- lisp/mail/sendmail.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 0d3eeecd8c8..c55cdc8412a 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -877,7 +877,7 @@ The variable is used to trigger insertion of the \"Mail-Followup-To\" header when sending a message to a mailing list." :type '(repeat string)) -(declare-function mml-to-mime "mml" ()) +(declare-function mm-long-lines-p "mm-bodies" (length)) (defun mail-send () "Send the message in the current buffer. @@ -955,6 +955,7 @@ the user from the mailer." (error "Invalid header line (maybe a continuation line lacks initial whitespace)")) (forward-line 1))) (goto-char opoint) + (require 'mml) (when (or mail-encode-mml ;; When we have long lines, we have to MIME encode ;; to get line folding. -- 2.39.5