diff options
| -rw-r--r-- | lisp/image-mode.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/image-mode.el b/lisp/image-mode.el index 7dfa691065c..3666009c7e0 100644 --- a/lisp/image-mode.el +++ b/lisp/image-mode.el | |||
| @@ -761,9 +761,11 @@ was inserted." | |||
| 761 | (type (if (fboundp 'imagemagick-types) | 761 | (type (if (fboundp 'imagemagick-types) |
| 762 | 'imagemagick | 762 | 'imagemagick |
| 763 | (image-type file-or-data nil data-p))) | 763 | (image-type file-or-data nil data-p))) |
| 764 | ;; :scale 1: If we do not set this, create-image will apply | ||
| 765 | ;; default scaling based on font size. | ||
| 764 | (image (if (not edges) | 766 | (image (if (not edges) |
| 765 | (create-image file-or-data type data-p) | 767 | (create-image file-or-data type data-p :scale 1) |
| 766 | (create-image file-or-data type data-p | 768 | (create-image file-or-data type data-p :scale 1 |
| 767 | :max-width (- (nth 2 edges) (nth 0 edges)) | 769 | :max-width (- (nth 2 edges) (nth 0 edges)) |
| 768 | :max-height (- (nth 3 edges) (nth 1 edges))))) | 770 | :max-height (- (nth 3 edges) (nth 1 edges))))) |
| 769 | (inhibit-read-only t) | 771 | (inhibit-read-only t) |