A new version of Morphic was added to project The Inbox:
http://source.squeak.org/inbox/Morphic-kfr.721.mcz

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

Name: Morphic-kfr.721
Author: kfr
Time: 30 June 2014, 2:00:53.343 pm
UUID: d711ff01-8351-494b-9dfc-1368733d779d
Ancestors: Morphic-cmm.720

Make hilight color in list panes more consistent

=============== Diff against Morphic-cmm.720 ===============

Item was changed:
  ----- Method: LazyListMorph>>drawBackgroundForMulti:on: (in category 'drawing') -----
  drawBackgroundForMulti: row on: aCanvas 
  	"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: [ self class listSelectionColor twiceDarker ]
- 		ifFalse: [ self class listSelectionColor ].
  	selectionDrawBounds := self drawBoundsForRow: row.
  	selectionDrawBounds := selectionDrawBounds intersect: self bounds.
  	aCanvas
  		fillRectangle: selectionDrawBounds
  		color: thisColor!

Item was changed:
  ----- Method: ListItemWrapper>>highlightingColor (in category 'accessing') -----
  highlightingColor
+ 	^LazyListMorph listSelectionTextColor
+ 	!
- 
- 	^Preferences menuSelectionColor makeForegroundColor!

Item was changed:
  ----- Method: SimpleHierarchicalListMorph>>drawOn: (in category 'drawing') -----
  drawOn: aCanvas 
  	super drawOn: aCanvas.
  	selectedMorph
  		ifNotNil: [aCanvas
  				fillRectangle: (((scroller transformFrom: self)
  						invertBoundsRect: selectedMorph bounds)
  						intersect: scroller bounds)
+ 				color: LazyListMorph listSelectionColor].
- 				color: Preferences menuSelectionColor].
  	self drawLinesOn: aCanvas!

Item was changed:
  ----- Method: SystemWindow class>>updatePreferences (in category 'initializing') -----
  updatePreferences
  	"Temporary method to update system-wide preferences"
  	Preferences setPreference: #defaultWindowColor toValue: (Color veryVeryLightGray muchLighter).
  	(Preferences preferenceAt: #defaultWindowColor) defaultValue: (Color veryVeryLightGray muchLighter).
  
  	Preferences setPreference: #menuAppearance3d toValue: true.
  	(Preferences preferenceAt: #menuAppearance3d) defaultValue: true.
  
  	Preferences setPreference: #menuColorFromWorld toValue: false.
  	(Preferences preferenceAt: #menuColorFromWorld) defaultValue: false.
  
  	Preferences setPreference: #roundedMenuCorners toValue: false.
  	(Preferences preferenceAt: #roundedMenuCorners) defaultValue: false.
  
  	Preferences setParameter: #menuColor to: (Color gray: 0.9).
  	Preferences setParameter: #menuTitleColor to: (Color transparent).
  	Preferences setParameter: #menuTitleBorderWidth to: 0.
  	Preferences setParameter: #defaultWorldColor to: (Color gray: 0.25).
  
  	Preferences setPreference: #showSplitterHandles toValue: false.
  	(Preferences preferenceAt: #showSplitterHandles) defaultValue: true.
  
  	Preferences setPreference: #showSharedFlaps toValue: false.
  	(Preferences preferenceAt: #showSharedFlaps) defaultValue: false.
  
  	Preferences installBrightWindowColors.
  
  	CornerGripMorph drawCornerResizeHandles: false.
  	FillInTheBlankMorph roundedDialogCorners: true.
  
  	LazyListMorph
  		listSelectionColor: LazyListMorph listSelectionColor;
+ 		listSelectionTextColor: LazyListMorph listSelectionTextColor.
- 		listSelectionTextColor: Color black.
  	PluggableButtonMorph roundedButtonCorners: true.
  	SystemWindow
  		clickOnLabelToEdit: false;
  		doubleClickOnLabelToExpand: true;
  		moveMenuButtonRight: true;
  		hideExpandButton: false.
  !