Gnus development mailing list
 help / color / mirror / Atom feed
* [Gnus 5.2.14] message-make-sender
@ 1996-06-10  7:04 =?ISO-2022-JP?Q?=1B$B<morioka@jaist.ac.jp
  1996-06-10  9:26 ` Per Abrahamsen
  1996-06-10 14:04 ` Richard Pieri
  0 siblings, 2 replies; 13+ messages in thread
From: =?ISO-2022-JP?Q?=1B$B<morioka@jaist.ac.jp @ 1996-06-10  7:04 UTC (permalink / raw)


[-- Attachment #1: Type: text/plain, Size: 320 bytes --]

  I think it is better if function `message-make-sender' check
(system-name) is FQDM. If (system-name) is not FQDM, message.el makes
invalid Sender field.

  IMHO, variable `mail-host-address' is better for mail address. For
example, in my site, we usually don't include machine names in our
mail-addresses.

  Thanks,


[-- Attachment #2: message.el.diff --]
[-- Type: application/octet-stream, Size: 598 bytes --]

--- message.el-orig	Mon Jun 10 12:46:41 1996
+++ message.el	Mon Jun 10 14:58:43 1996
@@ -1954,7 +1954,13 @@
   "Return the \"real\" user address.
 This function tries to ignore all user modifications, and 
 give as trustworthy answer as possible."
-  (concat (user-login-name) "@" (system-name)))
+  (let ((domain (system-name)))
+    (or (string-match "[^.]\\.[^.]" domain)
+	(if (and (boundp 'mail-host-address) mail-host-address)
+	    (setq domain mail-host-address)
+	  ))
+    (concat (user-login-name) "@" domain)
+    ))
 
 (defun message-make-address ()
   "Make the address of the user."

[-- Attachment #3: Type: text/plain, Size: 248 bytes --]

-- 
----------------------------------------------------------------------
Morioka Tomohiko <morioka@jaist.ac.jp>
(`Morioka' is my family name, `Tomohiko' is my personal name.)
---------------- I protest continuation of Chinese nuclear testing.---

^ permalink raw reply	[flat|nested] 13+ messages in thread

end of thread, other threads:[~1996-06-11 23:57 UTC | newest]

Thread overview: 13+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
1996-06-10  7:04 [Gnus 5.2.14] message-make-sender =?ISO-2022-JP?Q?=1B$B<morioka@jaist.ac.jp
1996-06-10  9:26 ` Per Abrahamsen
1996-06-10 11:18   ` =?ISO-2022-JP?Q?=1B$B<morioka@jaist.ac.jp
1996-06-10 12:59     ` Per Abrahamsen
1996-06-10 14:14     ` Richard Pieri
1996-06-10 16:06       ` 守岡 知彦 / MORIOKA Tomohiko
1996-06-10 17:27         ` Richard Pieri
1996-06-11  8:31           ` 守岡 知彦 / MORIOKA Tomohiko
1996-06-11 18:24             ` Lars Magne Ingebrigtsen
1996-06-11  0:40       ` Sudish Joseph
1996-06-11 14:09         ` Richard Pieri
1996-06-11 23:57           ` Sudish Joseph
1996-06-10 14:04 ` Richard Pieri

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 NNTP newsgroup(s).