Commit 0b431400 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(gnus-inews-domain-name): Once again test gnus-your-domain.

parent 3c24374d
......@@ -663,6 +663,9 @@ If optional argument GENERICFROM is a string, use it as the domain
name; if it is non-nil, strip of local host name from the domain name.
If the function `system-name' returns full internet name and the
domain is undefined, the domain name is got from it."
(and (null gnus-local-domain)
(boundp 'gnus-your-domain)
(setq gnus-local-domain gnus-your-domain))
(if (or genericfrom gnus-local-domain (getenv "DOMAINNAME"))
(let ((domain (or (if (stringp genericfrom) genericfrom)
(getenv "DOMAINNAME")
......
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