Don't resize images in image-mode if we have a rotation

* lisp/image-mode.el (image-fit-to-window): Don't resize of we
have a manually rotated imaged (and explain the resizing logic a
bit).
This commit is contained in:
Lars Ingebrigtsen 2021-02-16 14:00:55 +01:00
parent 5b10ca8f4f
commit b79055e960

View file

@ -985,7 +985,13 @@ Otherwise, display the image by calling `image-mode'."
(edges (window-inside-pixel-edges window))
(window-width (- (nth 2 edges) (nth 0 edges)))
(window-height (- (nth 3 edges) (nth 1 edges))))
;; If the size has been changed manually (with `+'/`-'),
;; then :max-width/:max-height is nil. In that case, do
;; no automatic resizing.
(when (and image-width image-height
;; Don't do resizing if we have a manual
;; rotation (from the `r' command), either.
(not (plist-get (cdr spec) :rotation))
(or (not (= image-width window-width))
(not (= image-height window-height))))
(unless image-fit-to-window-lock