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. !