aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLars Ingebrigtsen2019-10-29 13:56:49 +0100
committerLars Ingebrigtsen2019-10-29 13:56:49 +0100
commit0956a65e6f46a04f8fb2bce6e909ff6a10a1c016 (patch)
tree29f765cc30a198311d035a47bdbf30827a47585f
parent5860fd3123635af3c2e419bfde53e26fde85930b (diff)
downloademacs-0956a65e6f46a04f8fb2bce6e909ff6a10a1c016.tar.gz
emacs-0956a65e6f46a04f8fb2bce6e909ff6a10a1c016.zip
Make shr scale images on all frames
* lisp/net/shr.el (shr-rescale-image): Rescale images even if the window isn't on the current frame.
-rw-r--r--lisp/net/shr.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 93408840ab6..22d4cde34a7 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -1121,7 +1121,7 @@ WIDTH and HEIGHT are the sizes given in the HTML data, if any.
1121The size of the displayed image will not exceed 1121The size of the displayed image will not exceed
1122MAX-WIDTH/MAX-HEIGHT. If not given, use the current window 1122MAX-WIDTH/MAX-HEIGHT. If not given, use the current window
1123width/height instead." 1123width/height instead."
1124 (if (not (get-buffer-window (current-buffer))) 1124 (if (not (get-buffer-window (current-buffer) t))
1125 (create-image data nil t :ascent 100) 1125 (create-image data nil t :ascent 100)
1126 (let* ((edges (window-inside-pixel-edges 1126 (let* ((edges (window-inside-pixel-edges
1127 (get-buffer-window (current-buffer)))) 1127 (get-buffer-window (current-buffer))))