diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2020-08-05 12:31:44 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2020-08-05 12:31:44 +0200 |
| commit | 1b7eb828644a13259ff072e3464c6e8493571e6e (patch) | |
| tree | 96c414c75de45ceca47f10234d5c834617552f85 | |
| parent | a06f41ad2ca786a70940297fd832a649196be9be (diff) | |
| download | emacs-1b7eb828644a13259ff072e3464c6e8493571e6e.tar.gz | |
Tweak the Message screenshot insertion
* lisp/gnus/message.el (message-insert-screenshot): Force scaling
to 1, since the screenshot image will already be suitable for
displaying directly (it's the same resolution).
| -rw-r--r-- | lisp/gnus/message.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 1453cbe643e..378c3b04673 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -8694,9 +8694,12 @@ used to take the screenshot." (insert-image (create-image image 'png t :max-width (* (frame-pixel-width) 0.8) - :max-height (* (frame-pixel-height) 0.8)) + :max-height (* (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. + ;; Get a base64 version of the image -- this avoids later + ;; complications if we're auto-saving the buffer and + ;; restoring from a file. (with-temp-buffer (set-buffer-multibyte nil) (insert image) |