aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorManuel Giraud2023-11-01 13:59:37 +0100
committerEli Zaretskii2023-11-04 10:41:38 +0200
commitc0601fb534b200fcaf2bc2a1dd0b7dc1090bbbe6 (patch)
treea0cd74b457ca449c47dea654ee49cddfd92547e7
parentce4a62eece608f13db2449e5d4e2d38f253663c4 (diff)
downloademacs-c0601fb534b200fcaf2bc2a1dd0b7dc1090bbbe6.tar.gz
emacs-c0601fb534b200fcaf2bc2a1dd0b7dc1090bbbe6.zip
Don't need text properties when sending a mail
* lisp/mail/smtpmail.el (smtpmail-send-data): Don't get text properties when sending mail data. (Bug#66880)
-rw-r--r--lisp/mail/smtpmail.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/smtpmail.el b/lisp/mail/smtpmail.el
index 78688d170cc..e30c69f2441 100644
--- a/lisp/mail/smtpmail.el
+++ b/lisp/mail/smtpmail.el
@@ -1057,8 +1057,8 @@ Returns an error if the server cannot be contacted."
1057 (while data-continue 1057 (while data-continue
1058 (with-current-buffer buffer 1058 (with-current-buffer buffer
1059 (progress-reporter-update pr (point)) 1059 (progress-reporter-update pr (point))
1060 (setq sending-data (buffer-substring (line-beginning-position) 1060 (setq sending-data (buffer-substring-no-properties (line-beginning-position)
1061 (line-end-position))) 1061 (line-end-position)))
1062 (end-of-line 2) 1062 (end-of-line 2)
1063 (setq data-continue (not (eobp)))) 1063 (setq data-continue (not (eobp))))
1064 (smtpmail-send-data-1 process sending-data)) 1064 (smtpmail-send-data-1 process sending-data))