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 0d3eeecd8c8aa56fe3da0dbf4110ab37fb23e569..c55cdc8412aada65df76b178eb602df3099772f0 100644 (file)
--- 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.