unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
* [PATCH] Fix smtpmail-via-smtp
@ 2002-11-13  9:26 Simon Josefsson
  0 siblings, 0 replies; only message in thread
From: Simon Josefsson @ 2002-11-13  9:26 UTC (permalink / raw)


It seems feedmail.el calls smtpmail-via-smtp directly, not via
smtpmail-send-it, causing smtpmail-mail-address to never be set.  This
patch makes it falls back on user-mail-address in this case.  I will
commit this shortly unless someone objects.

2002-11-13  Simon Josefsson  <jas@extundo.com>

	* mail/smtpmail.el (smtpmail-via-smtp): Fall back to
	user-mail-address as sender.
--- smtpmail.el.~1.50.~	2002-10-11 04:18:20.000000000 +0200
+++ smtpmail.el	2002-11-13 10:23:22.000000000 +0100
@@ -540,7 +540,9 @@
 	(host (or smtpmail-smtp-server
 		  (error "`smtpmail-smtp-server' not defined")))
 	(port smtpmail-smtp-service)
-	(envelope-from (mail-envelope-from))
+	(envelope-from (or (mail-envelope-from)
+			   smtpmail-mail-address
+			   user-mail-address)
 	response-code
 	greeting
 	process-buffer
@@ -690,8 +692,7 @@
 		     "")))
 ;	      (smtpmail-send-command process (format "MAIL FROM:%s@%s" (user-login-name) (smtpmail-fqdn)))
 	      (smtpmail-send-command process (format "MAIL FROM: <%s>%s%s"
-						     (or envelope-from
-							 smtpmail-mail-address)
+						     envelope-from
 						     size-part
 						     body-part))

^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~2002-11-13  9:26 UTC | newest]

Thread overview: (only message) (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2002-11-13  9:26 [PATCH] Fix smtpmail-via-smtp Simon Josefsson

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).