Fix image/svg+xml display in shr

* lisp/net/shr.el (shr-put-image): Display svg images as svg
(bug#27799).  I suspect the previous change was checked in by
accident in conjuction with some other svg changes.

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 4d4e8a809e1aaf1a08b04657d4816e5726a96eaa..2f73f982af9d8b93258da1d1aac55060e8b74443 100644 (file)
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -998,7 +998,7 @@ 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 'imagemagick t :ascent 100))
+                     (create-image data 'svg t :ascent 100))
                     ((eq size 'full)
                      (ignore-errors
                        (shr-rescale-image data content-type