summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2020-08-05 15:02:28 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2020-08-05 15:02:28 +0200
commit4b3f44fc97d3cb29fceb47ec5ba16009b6de7152 (patch)
tree18730289fbb55bb4ade14bf625da340f4bd9ae88
parentdc47bc77dc1c9d34c4c1e2830fe2bfd6be6e241a (diff)
downloademacs-4b3f44fc97d3cb29fceb47ec5ba16009b6de7152.tar.gz
Fix max-width/height for Message screenshots
* lisp/gnus/message.el (message-insert-screenshot): :max-width/height apparently has to be integers.
-rw-r--r--lisp/gnus/message.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 378c3b04673..cf2b8eebc30 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -8693,8 +8693,8 @@ used to take the screenshot."
(set-mark (point))
(insert-image
(create-image image 'png t
- :max-width (* (frame-pixel-width) 0.8)
- :max-height (* (frame-pixel-height) 0.8)
+ :max-width (truncate (* (frame-pixel-width) 0.8))
+ :max-height (truncate (* (frame-pixel-height) 0.8))
:scale 1)
(format "<#part type=\"image/png\" disposition=inline content-transfer-encoding=base64 raw=t>\n%s\n<#/part>"
;; Get a base64 version of the image -- this avoids later