mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Rename the textsec-check function to textsec-suspicious-p

Browse source 
* lisp/net/shr.el (shr-tag-a):
* lisp/international/textsec-check.el (textsec-suspicious-p):
* lisp/gnus/message.el (message-send-mail):
* lisp/gnus/gnus-art.el (article--check-suspicious-addresses):
* etc/NEWS (like):
* doc/lispref/text.texi (Suspicious Text):
(Suspicious Text): Rename the textsec-check function to
textsec-suspicious-p.
This commit is contained in:
Lars Ingebrigtsen 2022-01-20 14:33:36 +01:00
parent 2de01ff1ba
commit 55c1670bc5
6 changed files with 15 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/gnus/gnus-art.el
View file

@ -2661,7 +2661,7 @@ If PROMPT (the prefix), prompt for a coding system to use."
(dolist (header (mail-header-parse-addresses addresses t))
(when-let* ((address (car (ignore-errors
(mail-header-parse-address header))))
(warning (textsec-check address 'email-address)))
(warning (textsec-suspicious-p address 'email-address)))
(goto-char (point-min))
(while (search-forward address nil t)
(put-text-property (match-beginning 0) (match-end 0)