diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-01-20 09:36:04 +0100 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-01-20 09:36:12 +0100 |
commit | 536ad66ae3713a18460d0fec16bfc9c60b60016c (patch) | |
tree | 0fc66ffe7a50eb7653cf0e841b1204ab8fb41d7c | |
parent | c027ad59dd8446ea146fa5303222e17a18a44fd9 (diff) | |
download | emacs-536ad66ae3713a18460d0fec16bfc9c60b60016c.tar.gz emacs-536ad66ae3713a18460d0fec16bfc9c60b60016c.tar.bz2 emacs-536ad66ae3713a18460d0fec16bfc9c60b60016c.zip |
Improve textsec-domain-suspicious-p message
* lisp/international/textsec.el (textsec-domain-suspicious-p):
Improve warning message.
-rw-r--r-- | lisp/international/textsec.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/international/textsec.el b/lisp/international/textsec.el index c30d997b4fe..e6a04d93de5 100644 --- a/lisp/international/textsec.el +++ b/lisp/international/textsec.el @@ -252,7 +252,10 @@ or use certain other unusual mixtures of characters." domain) ;; Does IDNA allow it? (unless (puny-highly-restrictive-domain-p domain) - (throw 'found (format "`%s' is not highly-restrictive" domain))) + (throw + 'found + (format "`%s' mixes characters from different scripts in suspicious ways" + domain))) ;; Check whether any segment of the domain name is confusable with ;; an ASCII-only segment. (dolist (elem (split-string domain "\\.")) |