[Emacs-diffs] master 1ba50a0: Add a frame around the placeholder image in shr

[Lars Ingebrigtsen]

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

    Add a frame around the placeholder image in shr
    
    * lisp/net/shr.el (shr-make-placeholder-image): Add a frame
    around the image.
---
 lisp/net/shr.el |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 78862b3..6352d38 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -1548,7 +1548,8 @@ The preference is a float determined from 
`shr-prefer-media-type'."
             height max-height))
     (setq svg (svg-create width height))
     (svg-gradient svg "background" 'linear '((0 . "#b0b0b0") (100 . 
"#808080")))
-    (svg-rectangle svg 0 0 width height :gradient "background")
+    (svg-rectangle svg 0 0 width height :gradient "background"
+                   :stroke-width 2 :stroke-color "black")
     (let ((image (svg-image svg)))
       (image-set-property image :ascent 100))))