[Emacs-diffs] master e4a4aa3: Don't have shr bug out if svg support isn't available

[Lars Ingebrigtsen]

branch: master
commit e4a4aa3057e4ab50ba690fbea3a06e578f62722b
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Don't have shr bug out if svg support isn't available
    
    * lisp/net/shr.el (shr-put-image): Don't bug out if SVG support
    isn't available.
---
 lisp/net/shr.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index f3d5de9..9340884 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -1075,7 +1075,8 @@ element is the data blob and the second element is the 
content-type."
                      (create-image data nil t :ascent 100
                                    :format content-type))
                     ((eq content-type 'image/svg+xml)
-                     (create-image data 'svg t :ascent 100))
+                      (when (image-type-available-p 'svg)
+                       (create-image data 'svg t :ascent 100)))
                     ((eq size 'full)
                      (ignore-errors
                        (shr-rescale-image data content-type