[Emacs-diffs] emacs-25 31a97ac 2/2: Merge branch 'emacs-25' of git.sv.gnu.org:/srv/git/emacs into emacs-25

[Michael Albinus]

branch: emacs-25
commit 31a97acf43b7eb95f3ddc6ceca1682b35a5b1945
Merge: 4e62197 9fb185a
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>

    Merge branch 'emacs-25' of git.sv.gnu.org:/srv/git/emacs into emacs-25
---
 lisp/net/shr.el |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 979b0ca..0703171 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -1361,7 +1361,7 @@ The preference is a float determined from 
`shr-prefer-media-type'."
         (start (point)))
     (unless url
       (setq url (car (shr--extract-best-source dom))))
-    (if image
+    (if (> (length image) 0)
         (shr-tag-img nil image)
       (shr-insert " [video] "))
     (shr-urlify start (shr-expand-url url))))