[BUG] Org-image-max-width doesn't account for org-indent-mode [9.7.8 (9.7.8-7f2ce8 @ /tmp/bug/elpa/org-9.7.8/)]

[Sean Devlin <spd@toadstyle.org>]

Hi folks,

I've found a case where an inline image's maximum width is computed
incorrectly in Org 9.7.8. Here's a recipe:

1. Find an image wider than a default Emacs frame
2. Create an Org file with these contents (between the lines):

==================================================
[[file:/path/to/wide/image.png]]

* heading 1

[[file:/path/to/wide/image.png]]

** heading 2

[[file:/path/to/wide/image.png]]

*** heading 3

[[file:/path/to/wide/image.png]]
==================================================

3. emacs -Q
4. Evaluate these forms:

(add-to-list 'load-path "/path/to/org-9.7.8/")
(require 'org)
(setq org-image-max-width 'window)
(setq org-startup-indented t)

5. Open the file from step 2
6. C-c C-x C-v to toggle inline image display

Observe that the images are cropped on the right in the amount of the
leading indentation added by org-indent-mode. If you scroll down, you
should see each successive image has a bit more cut off. (The first
image is displayed correctly, since it is not under a heading and has no
indentation.)

Thanks!

Emacs  : GNU Emacs 29.4 (build 1, aarch64-apple-darwin21.6.0, NS appkit-2113.60 Version 12.6.6 (Build 21G646))
of 2024-07-24
Package: Org mode version 9.7.8 (9.7.8-7f2ce8 @ /path/to/org-9.7.8/)