Commit 3a6b5e6a authored by Lars Ingebrigtsen's avatar Lars Ingebrigtsen

Add a new variable smtpmail-retries

* doc/misc/smtpmail.texi (Server workarounds): Mention it (bug#34177).

* lisp/mail/smtpmail.el (smtpmail-retries): New variable.
(smtpmail-via-smtp): Use it.
parent 90ddad80
Pipeline #3168 passed with stage
in 74 minutes and 3 seconds
......@@ -372,6 +372,13 @@ implement support for common requirements.
@table @code
@item smtpmail-retries
@vindex smtpmail-retries
An SMTP server may return an error code saying that there's a
transient error (a @samp{4xx} code). In that case, smtpmail will try
to resend the message automatically, and the number of times it tries
before giving up is determined by this variable, which defaults to 10.
@item smtpmail-local-domain
@vindex smtpmail-local-domain
The variable @code{smtpmail-local-domain} controls the hostname sent
......
......@@ -1164,7 +1164,8 @@ attempt when communicating with the SMTP server(s), the
---
*** smtpmail will now try resending mail when getting a transient 4xx
error message from the SMTP server.
error message from the SMTP server. The new 'smtpmail-retries'
variable says how many times to retry.
** Footnote mode
......
......@@ -165,6 +165,13 @@ attempt."
:type '(choice regexp (const :tag "None" nil))
:version "27.1")
(defcustom smtpmail-retries 10
"The number of times smtpmail will retry sending when getting transient errors.
These are errors with a code of 4xx from the SMTP server, which
mean \"try again\"."
:type 'integer
:version "27.1")
;; End of customizable variables.
......@@ -823,7 +830,7 @@ Returns an error if the server cannot be contacted."
)
((and (numberp (car result))
(<= 400 (car result) 499)
(< send-attempts 10))
(< send-attempts smtpmail-retries))
(message "Got transient error code %s when sending; retrying attempt %d..."
(car result) send-attempts)
;; Retry on getting a transient 4xx code; see
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment