procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

; Yet another improvement of doc strings in textsec

Browse source 
* lisp/international/textsec.el (textsec-local-address-suspicious-p)
(textsec-name-suspicious-p): Fix wording of doc strings.
This commit is contained in:
Eli Zaretskii 2022-01-19 14:00:45 +02:00
parent 9693eb4aef
commit b6db2d0a6f
1 changed files with 7 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
lisp/international/textsec.el
View file

@ -235,9 +235,9 @@ Return nil if it isn't suspicious. If it is, return a string explaining
the potential problem.
Domain names are considered suspicious if they use characters
that can look similar to other characters when displayed, or that
are not allowed by Unicode's IDNA mapping, or are certain other
non-usual mixtures of characters."
that can look similar to other characters when displayed, or
use characters that are not allowed by Unicode's IDNA mapping,
or use certain other unusual mixtures of characters."
(catch 'found
(seq-do
(lambda (char)
@ -257,8 +257,8 @@ If it isn't suspicious, return nil. If it is, return a string explaining
the potential problem.
Email addresses are considered suspicious if they use characters
that can look similar to other characters when displayed, or are
certain other non-usual mixtures of characters."
that can look similar to other characters when displayed, or use
certain other unusual mixtures of characters."
(cond
((not (equal local (ucs-normalize-NFKC-string local)))
(format "`%s' is not in normalized format `%s'"
@ -279,8 +279,8 @@ If it isn't suspicious, return nil. If it is, return a string
explaining the potential problem.
Names are considered suspicious if they use characters that can
look similar to other characters when displayed, or are certain
other non-usual mixtures of characters."
look similar to other characters when displayed, or use certain
other unusual mixtures of characters."
(cond
((not (equal name (ucs-normalize-NFC-string name)))
(format "`%s' is not in normalized format `%s'"