Function: mh-x-image-url-sane-p

mh-x-image-url-sane-p is a byte-compiled function defined in mh-xface.el.gz.

Signature

(mh-x-image-url-sane-p URL)

Documentation

Check if URL is something sensible.

Source Code

;; Defined in /usr/src/emacs/lisp/mh-e/mh-xface.el.gz
(defun mh-x-image-url-sane-p (url)
  "Check if URL is something sensible."
  (let ((len (length url)))
    (cond ((> len 100) nil)
          ((and (>= len 5)
                (equal (substring url 0 5) "http:") t))
          ((and (>= len 6)
                (equal (substring url 0 6) "https:") t))
          (t nil))))