Function: textsec-url-suspicious-p
textsec-url-suspicious-p is a byte-compiled function defined in
textsec.el.gz.
Signature
(textsec-url-suspicious-p URL)
Documentation
Say whether URL looks suspicious.
If it isn't, return nil. If it is, return a string explaining the potential problem.
Source Code
;; Defined in /usr/src/emacs/lisp/international/textsec.el.gz
(defun textsec-url-suspicious-p (url)
"Say whether URL looks suspicious.
If it isn't, return nil. If it is, return a string explaining the
potential problem."
(let ((parsed (url-generic-parse-url url)))
;; The URL may not have a domain.
(and (url-host parsed)
(textsec-domain-suspicious-p (url-host parsed)))))