bug#47036: 27.1; XBM file image cannot be resized with :width and :height

[Lars Ingebrigtsen]

ynyaaa@gmail.com writes:

> Evaluating the form below, XBM image with :height property is not
> displayed in the first and second inserted line.
>
> (let ((img1 (find-image '((:file "gnus/gnus.xbm" :type xbm :height 100))))
>       (img2 (find-image '((:file "gnus/gnus.xbm" :type xbm :width 100))))
>       (img3 (find-image '((:file "gnus/gnus.xbm" :type xbm))))
>       (img4 (find-image '((:file "gnus/gnus.xpm" :type xpm :height 100 )))))
>   (insert "with :height\t")
>   (insert-image img1 "ALTTEXT1")
>   (insert "\nwith :width\t")
>   (insert-image img2 "ALTTEXT2")
>   (insert "\nwithout :width or :height\t")
>   (insert-image img3 "ALTTEXT3")
>   (insert "\nXPM with :height\t")
>   (insert-image img4 "ALTTEXT4"))

I've now fixed this in Emacs 29.

-- 
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no