<div dir="ltr"><div>Thanks, <br></div><div>Add 
<a href="http://source.squeak.org/inbox/Morphic-kfr.2015.mcz" rel="noreferrer" target="_blank">http://source.squeak.org/inbox/Morphic-kfr.2015.mcz</a> as well. Then we have restored all functionality :-D</div><div><br></div><div>Best, Karl<br></div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Sat, Jul 2, 2022 at 9:45 AM <<a href="mailto:commits@source.squeak.org">commits@source.squeak.org</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">Marcel Taeumel uploaded a new version of Graphics to project The Trunk:<br>
<a href="http://source.squeak.org/trunk/Graphics-kfr.527.mcz" rel="noreferrer" target="_blank">http://source.squeak.org/trunk/Graphics-kfr.527.mcz</a><br>
<br>
==================== Summary ====================<br>
<br>
Name: Graphics-kfr.527<br>
Author: kfr<br>
Time: 1 July 2022, 7:15:00.033758 pm<br>
UUID: 45123247-99ec-da41-b9a2-a3680dfe2f66<br>
Ancestors: Graphics-kfr.526<br>
<br>
We can't reduce color of 32 bit depth directly.<br>
Convert to 16 bits first to get around problem.<br>
<br>
=============== Diff against Graphics-kfr.526 ===============<br>
<br>
Item was changed:<br>
  ----- Method: Form>>copyWithColorsReducedTo: (in category 'converting') -----<br>
  copyWithColorsReducedTo: nColors<br>
        "Note: this has not been engineered.<br>
        There are better solutions in the literature."<br>
        | palette colorMap |<br>
+       self depth > 16 ifTrue:[^(self asFormOfDepth: 16) copyWithColorsReducedTo: nColors]. "First reduce to 16 bit depth"<br>
-       self depth > 16 ifTrue:[^self]."bail out. will cause problems on 32 bit depth forms"<br>
        palette := self reducedPaletteOfSize: nColors.<br>
        colorMap := (1 to: (1 bitShift: depth)) collect:<br>
                [:i | | pc closest |<br>
                pc := Color colorFromPixelValue: i-1 depth: depth.<br>
                closest := palette detectMin: [:c | c diff: pc].<br>
                closest pixelValueForDepth: depth].<br>
        ^ self deepCopy copyBits: self boundingBox from: self at: 0@0 colorMap: (colorMap as: Bitmap)<br>
                !<br>
<br>
<br>
</blockquote></div>