Improve textsec-domain-suspicious-p message

* lisp/international/textsec.el (textsec-domain-suspicious-p):
Improve warning message.

diff --git a/lisp/international/textsec.el b/lisp/international/textsec.el
index c30d997b4fecf0934ba5d081f6ead7a1ec83f770..e6a04d93de5dce462c62717de432bc0e7ee8e680 100644 (file)
--- 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 "\\."))