Fix compilation warning in previous sendmail.el change
* lisp/mail/sendmail.el (mm-long-lines-p): Fix compilation warning.
This commit is contained in:
parent
f0b4f2ee6b
commit
84fe486660
1 changed files with 2 additions and 1 deletions
|
@ -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.
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue