From e4a4aa3057e4ab50ba690fbea3a06e578f62722b Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sat, 19 Oct 2019 10:23:19 +0200 Subject: [PATCH] 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 f3d5de9fb67..93408840ab6 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 -- 2.39.2