From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sun, 20 Feb 2022 12:45:56 +0000 (+0100)
Subject: Fix compilation warning in previous sendmail.el change
X-Git-Tag: emacs-29.0.90~2207
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=84fe4866605ae47cdfe7059fad0c3ace7d324a68;p=emacs.git

Fix compilation warning in previous sendmail.el change

* lisp/mail/sendmail.el (mm-long-lines-p): Fix compilation warning.
---

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.