'From Squeak3.3alpha of 30 January 2002 [latest update: #4798] on 24 March 2002 at 1:06:36 am'! "Change Set: recentChangesColor-dew Date: 24 March 2002 Author: Doug Way A tweak to correct the multi-selection color in the Recent Changes window, which was trying to darker a transparent color, and was affected by the Color changes."! !PluggableListMorphOfMany methodsFor: 'drawing' stamp: 'dew 3/24/2002 00:57'! drawOn: aCanvas | onMorph | super drawOn: aCanvas. 1 to: list size do: "NOTE: should be optimized to only visible morphs" [:index | (self listSelectionAt: index) ifTrue: [onMorph _ scroller submorphs at: index. aCanvas fillRectangle: (((scroller transformFrom: self) localBoundsToGlobal: onMorph bounds) intersect: scroller bounds) color: color blacker]]! !