mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-25 19:11:56 +00:00
Code Issues Releases Activity

message.el (message-valid-fqdn-regexp): Udate with newly approved top-level domain names ".tel" and ".asia".

Browse Source
This commit is contained in:
Tassilo Horn 2011-12-10 01:51:53 +00:00 committed by Katsumi Yamaoka
parent 1d84e9bbab
commit bacede64e6
2 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/gnus/ChangeLog
View File

@ -1,3 +1,8 @@
2011-12-09 Tassilo Horn <tassilo@member.fsf.org>
* message.el (message-valid-fqdn-regexp): Udate with newly approved
top-level domain names ".tel" and ".asia".
2011-12-08 Katsumi Yamaoka <yamaoka@jpl.org>
* gnus-sum.el (gnus-summary-show-article): Don't load shr

6
lisp/gnus/message.el
View File

@ -1893,14 +1893,14 @@ You must have the \"hashcash\" binary installed, see `hashcash-path'."
(concat "[a-z0-9][-.a-z0-9]+\\." ;; [hostname.subdomain.]domain.
;; valid TLDs:
"\\([a-z][a-z]\\|" ;; two letter country TDLs
"aero\\|arpa\\|bitnet\\|biz\\|bofh\\|"
"aero\\|arpa\\|asia\\|bitnet\\|biz\\|bofh\\|"
"cat\\|com\\|coop\\|edu\\|gov\\|"
"info\\|int\\|jobs\\|"
"mil\\|mobi\\|museum\\|name\\|net\\|"
"org\\|pro\\|travel\\|uucp\\)")
"org\\|pro\\|tel\\|travel\\|uucp\\)")
;; http://en.wikipedia.org/wiki/List_of_Internet_top-level_domains
;; http://en.wikipedia.org/wiki/GTLD
;; `in the process of being approved': .asia .post .tel .sex
;; `approved, but not yet in operation': .xxx
;; "dead" nato bitnet uucp
"Regular expression that matches a valid FQDN."
;; see also: gnus-button-valid-fqdn-regexp