Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 17:24:23 +00:00
Code Issues Projects Releases Packages Wiki Activity

Merge branch 'emacs-25' of git.sv.gnu.org:/srv/git/emacs into emacs-25

Browse source
This commit is contained in:
Michael Albinus 2016-01-04 23:28:23 +01:00
commit 31a97acf43
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/net/shr.el
View file

@ -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))))