Chris Muller uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-cmm.417.mcz

==================== Summary ====================

Name: Morphic-cmm.417
Author: cmm
Time: 7 April 2010, 9:02:56.996 pm
UUID: 5c9474b1-a42e-457e-b17f-7f51382856f0
Ancestors: Morphic-laza.416

Fixed selection-color for multi-select lists.

=============== Diff against Morphic-laza.416 ===============

Item was changed:
  ----- Method: LazyListMorph>>drawBackgroundForMulti:on: (in category 'drawing') -----
+ drawBackgroundForMulti: row on: aCanvas 
- drawBackgroundForMulti: row on: aCanvas
- 	| selectionDrawBounds thisColor |
  	"shade the background paler, if this row is selected, but not the current selected row"
+ 	| selectionDrawBounds thisColor |
  	thisColor := selectedRow = row
+ 		ifTrue: [ self class listSelectionColor ]
+ 		ifFalse: [ self class listSelectionColor muchLighter ].
- 				ifTrue: [Preferences menuSelectionColor]
- 				ifFalse: [Preferences menuSelectionColor muchLighter].
  	selectionDrawBounds := self drawBoundsForRow: row.
  	selectionDrawBounds := selectionDrawBounds intersect: self bounds.
+ 	aCanvas
+ 		fillRectangle: selectionDrawBounds
+ 		color: thisColor!
- 	aCanvas fillRectangle: selectionDrawBounds color: thisColor!