Don't have shr bug out on degenerate <img> tags

* lisp/net/shr.el (shr-tag-img): Protect against contructs like
<img src=" ">.

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 1103a9302423c6c0600251cd5cf077f4195bdbab..edea7cb297c328ef599af6d5c5abb5a7fe00da6a 100644 (file)
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -1560,6 +1560,10 @@ The preference is a float determined from `shr-prefer-media-type'."
        (when (zerop (length alt))
          (setq alt "*"))
        (cond
+         ((null url)
+          ;; After further expansion, there turned out to be no valid
+          ;; src in the img after all.
+          )
         ((or (member (dom-attr dom 'height) '("0" "1"))
              (member (dom-attr dom 'width) '("0" "1")))
          ;; Ignore zero-sized or single-pixel images.