Marcel Taeumel uploaded a new version of Morphic to project Squeak 6.0: http://source.squeak.org/squeak60/Morphic-mt.2030.mcz
==================== Summary ====================
Name: Morphic-mt.2030 Author: mt Time: 22 September 2023, 2:10:10.065389 pm UUID: b61f285f-ed62-954e-b971-e73d403526ae Ancestors: Morphic-mt.2029
Fixes another visual regression from Morphic-mt.2028
=============== Diff against Morphic-mt.2029 ===============
Item was changed: ----- Method: PluggableTextMorph>>drawFrameAdornment:on: (in category 'drawing') ----- drawFrameAdornment: aColor on: aCanvas "Indicate edit status for the text editor" self class simpleFrameAdornments ifTrue: [ | adornmentWidth | adornmentWidth := ((self valueOfProperty: #frameAdornmentWidth ifAbsent: [1]) * RealEstateAgent scaleFactor) truncated. aCanvas + frameRectangle: self scroller bounds - frameRectangle: self innerBounds width: adornmentWidth color: aColor. aCanvas + frameRectangle: (self scroller bounds insetBy: adornmentWidth) - frameRectangle: (self innerBounds insetBy: adornmentWidth) width: adornmentWidth color: (aColor alpha: aColor alpha / 3.0) ] ifFalse: [ | form | "Class-side adornment cache is currently using pre-multiplied alpha, so we need to use rule 34 which works for < 32bpp, too." form := self class adornmentWithColor: aColor. aCanvas image: form + at: self scroller bounds topRight - (form width @ 0) - at: self innerBounds topRight - (form width @ 0) sourceRect: form boundingBox rule: 34 ]!
squeak-dev@lists.squeakfoundation.org