andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make fully qualified domain names more fully qualified

Browse source 
* lisp/gnus/message.el (message-make-fqdn): Don't try to use a
system-name without any periods as a fully qualified domain name.
This commit is contained in:
Lars Ingebrigtsen 2017-09-13 18:08:34 +02:00
parent b74d536ed4
commit 6519df8f5a
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/gnus/message.el
View file

@ -5778,7 +5778,10 @@ give as trustworthy answer as possible."
(not (string-match message-bogus-system-names message-user-fqdn)))
;; `message-user-fqdn' seems to be valid
message-user-fqdn)
((not (string-match message-bogus-system-names sysname))
;; A system name without any dots is unlikely to be a good fully
;; qualified domain name.
((and (string-match "[.]" sysname)
(not (string-match message-bogus-system-names sysname)))
;; `system-name' returned the right result.
sysname)
;; Try `mail-host-address'.