shr-tag-video bug fix

* shr.el (shr-tag-video): Protect against the `poster' being
empty.
parent 6300655e
...@@ -1361,7 +1361,7 @@ The preference is a float determined from `shr-prefer-media-type'." ...@@ -1361,7 +1361,7 @@ The preference is a float determined from `shr-prefer-media-type'."
(start (point))) (start (point)))
(unless url (unless url
(setq url (car (shr--extract-best-source dom)))) (setq url (car (shr--extract-best-source dom))))
(if image (if (> (length image) 0)
(shr-tag-img nil image) (shr-tag-img nil image)
(shr-insert " [video] ")) (shr-insert " [video] "))
(shr-urlify start (shr-expand-url url)))) (shr-urlify start (shr-expand-url url))))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment