[squeak-dev] The Trunk: System-cmm.860.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Aug 2 21:29:36 UTC 2016


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

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

Name: System-cmm.860
Author: cmm
Time: 2 August 2016, 4:29:02.356681 pm
UUID: 0980ea7f-76ef-4ff1-8e27-b8e0840f9a70
Ancestors: System-mt.859

Fixes to the Community Dark theme:
	Dark themes must opposite a light theme -- in a Dark theme, darkness is the standard color of a widgets standard state, with increased lightness being used to indicate selected / hovered / feedback states.
	- Move toward a universal "selection" color, #dbAqua.  I would like to make this the color for text-selection too, but we would need to adjust the syntax colors for that, and this change is just intended to make Community Dark minimally usable, not my preference.
	- Buttons now indicate their "on" selection state with a little color.
	- The labels of background windows are now readable.
	- The color palette was much too bright.  Darkened it.

=============== Diff against System-mt.859 ===============

Item was changed:
  ----- Method: CommunityTheme class>>addDarkButtons: (in category 'instance creation') -----
  addDarkButtons: theme
  	"self createDark apply."
  	theme
+ 		set: #borderColor for: #PluggableButtonMorph to: Color gray ;
+ 		set: #color for: #PluggableButtonMorph to: Color darkGray ;
- 		set: #borderColor for: #PluggableButtonMorph to: Color darkGray darker;
- 		set: #color for: #PluggableButtonMorph to: Color gray;
  		set: #textColor for: #PluggableButtonMorph to: Color white;
  
+ 		set: #selectionModifier for: #PluggableButtonMorph to: [ [:c | self dbAqua twiceDarker] ];
+ 		set: #hoverModifier for: #PluggableButtonMorph to: [ [:c | c adjustBrightness: 0.2] ];
+ 		set: #feedbackModifier for: #PluggableButtonMorph to: [ [:c | c adjustBrightness: 0.3] ].
- 		set: #selectionModifier for: #PluggableButtonMorph to: [ [:c | c adjustBrightness: -0.2] ];
- 		set: #hoverModifier for: #PluggableButtonMorph to: [ [:c | c adjustBrightness: -0.2] ];
- 		set: #feedbackModifier for: #PluggableButtonMorph to: [ [:c | c adjustBrightness: -0.3] ].
  	
  	"And the plus-version."
  	theme set: #disabledTextColor for: #PluggableButtonMorphPlus to: Color gray.
  !

Item was changed:
  ----- Method: CommunityTheme class>>addDarkMenusAndDockingBars: (in category 'instance creation') -----
  addDarkMenusAndDockingBars: theme
  	"self createDark apply."
  	theme
  		set: #borderWidth for: #MenuMorph to: 0;
  		set: #color for: #MenuMorph to: Color darkGray;
  		set: #titleTextColor for: #MenuMorph to: Color white;
  		set: #lineColor for: #MenuMorph to: Color lightGray;
  		set: #lineStyle for: #MenuMorph to: BorderStyle default;
  		set: #lineWidth for: #MenuMorph to: 1.
  		
  	theme
  		set: #textColor for: #MenuItemMorph to: Color white;
+ 		set: #selectionColor for: #MenuItemMorph to: self dbAqua;
+ 		set: #selectionTextColor for: #MenuItemMorph to: Color white.
- 		set: #selectionColor for: #MenuItemMorph to: Color white;
- 		set: #selectionTextColor for: #MenuItemMorph to: Color black.
  		"set: #subMenuMarker for: #MenuItemMorph to: nil." "Use hard-coded default. See MenuItemMorph."
  		
  	"The world main docking bar."
  	theme
  "		set: #color for: #DockingBarMorph to: Color darkGray;"
  "		set: #selectionColor for: #DockingBarItemMorph to: self darkContentSecondary;"
  		set: #logoColor for: #TheWorldMainDockingBar to: Color white;
  		set: #selectionLogoColor for: #TheWorldMainDockingBar to: Color black.!

Item was changed:
  ----- Method: CommunityTheme class>>addDarkScrollables: (in category 'instance creation') -----
  addDarkScrollables: theme
  	"self createDark apply."
  
  	"Scroll bars"
  	theme
  		set: #thumbColor for: #ScrollBar to: Color gray;
  		set: #thumbBorderColor for: #ScrollBar to: Color darkGray.
  	
  	"Scroll panes (includes generic stuff for list widgets, tree widgets, and text widgets."
  	theme
  		set: #color for: #ScrollPane to: (Color gray: 0.1).
  		
  	"List widgets"
  	theme
  		set: #textColor for: #PluggableListMorph to: (Color gray: 0.9);
+ 		set: #selectionColor for: #PluggableListMorph to: self dbAqua;
- 		set: #selectionColor for: #PluggableListMorph to: (Color  r: 0.15 g: 0.4 b: 0.15 alpha: 1.0);
  		set: #selectionTextColor for: #PluggableListMorph to: Color white;
+ 		derive: #multiSelectionColor for: #PluggableListMorph from: #PluggableListMorph at: #selectionColor do: [:c | c twiceDarker];
+ 		set: #filterColor for: #PluggableListMorph to: (self dbYellow alpha: 0.5);
+ 		set: #filterTextColor for: #PluggableListMorph to: Color white;
+ 		set: #preSelectionModifier for: #PluggableListMorph to: [ [:c | c twiceDarker ] ];
+ 		set: #hoverSelectionModifier for: #PluggableListMorph to: [ [:c | c twiceDarker alpha: 0.5 ] ].
- 		set: #filterColor for: #PluggableListMorph to: self dbYellow;
- 		set: #filterTextColor for: #PluggableListMorph to: Color black;
- 		set: #preSelectionModifier for: #PluggableListMorph to: [ [:c | c lighter alpha: 0.5 ] ];
- 		set: #hoverSelectionModifier for: #PluggableListMorph to: [ [:c | c lighter alpha: 0.5 ] ].
  		
  	"Tree widgets"
  	theme
  		set: #highlightTextColor for: #SimpleHierarchicalListMorph to: self dbYellow lighter lighter;
  		set: #lineColor for: #SimpleHierarchicalListMorph to: Color gray.
  	
  	"Text widgets"
  	theme
  		set: #textColor for: #PluggableTextMorph to: (Color gray: 0.9);
  		set: #caretColor for: #PluggableTextMorph to: Color white;
  		set: #selectionColor for: #PluggableTextMorph to: (Color  r: 0.15 g: 0.4 b: 0.15 alpha: 1.0);
  		set: #unfocusedSelectionModifier for: #PluggableTextMorph to: [ [:c | c duller] ];
  		set: #adornmentReadOnly for: #PluggableTextMorph to: self dbPurple;
  		set: #adornmentRefuse for: #PluggableTextMorph to: self dbBlue;
  		set: #adornmentConflict for: #PluggableTextMorph to: self dbRed;
  		set: #adornmentDiff for: #PluggableTextMorph to: self dbGreen;
  		set: #adornmentNormalEdit for: #PluggableTextMorph to: self dbOrange;
  		set: #adornmentDiffEdit for: #PluggableTextMorph to: self dbYellow.
  	theme
  		set: #balloonTextColor for: #PluggableTextMorphPlus to: Color darkGray.!

Item was changed:
  ----- Method: CommunityTheme class>>addDarkWindowColors: (in category 'instance creation') -----
  addDarkWindowColors: theme
  	"self createDark apply."
  	theme
  		set: #uniformWindowColor for: #Model to: Color darkGray;
  		
  		set: #unfocusedWindowColorModifier for: #SystemWindow to: [ [:color | color darker] ];
+ 		set: #unfocusedLabelColor for: #SystemWindow to: Color veryLightGray;
- 		set: #unfocusedLabelColor for: #SystemWindow to: Color gray;
  		set: #focusedLabelColor for: #SystemWindow to: Color white;
  
  		set: #customWindowColor for: #Browser to: self dbGreen;
  		set: #customWindowColor for: #ChangeList to: self dbBlue;
  		set: #customWindowColor for: #ChangeSorter to: self dbBlue;
  		set: #customWindowColor for: #ChatNotes to: self dbPurple;
  		set: #customWindowColor for: #ClassCommentVersionsBrowser to: self dbPurple;
  		set: #customWindowColor for: #Debugger to: self dbRed;
  		set: #customWindowColor for: #DualChangeSorter to: self dbBlue;
  		set: #customWindowColor for: #FileContentsBrowser to: self dbYellow;
  		set: #customWindowColor for: #FileList to: self dbYellow;
  		set: #customWindowColor for: #InstanceBrowser to: self dbBlue;
  		set: #customWindowColor for: #Lexicon to: self dbBlue;
  		set: #customWindowColor for: #MCTool to: self dbPurple;
  		set: #customWindowColor for: #MessageNames to: self dbGreen;
  		set: #customWindowColor for: #MessageSet to: self dbBlue;
  		set: #customWindowColor for: #PackagePaneBrowser to: self dbGreen;
  		set: #customWindowColor for: #PluggableFileList to: self dbYellow;
  		set: #customWindowColor for: #PreferenceBrowser to: self dbBlue;
  		set: #customWindowColor for: #SMLoader to: self dbOrange;
  		set: #customWindowColor for: #SMLoaderPlus to: self dbOrange;
  		set: #customWindowColor for: #SMReleaseBrowser to: self dbOrange;
  		set: #customWindowColor for: #ScriptingDomain to: self dbYellow;
  		set: #customWindowColor for: #SelectorBrowser to: self dbBlue;
  		set: #customWindowColor for: #StringHolder to: self dbYellow;
  		set: #customWindowColor for: #TestRunner to: self dbOrange;
  		set: #customWindowColor for: #TranscriptStream to: self dbOrange;
  		set: #customWindowColor for: #VersionsBrowser to: self dbPurple.!

Item was changed:
  ----- Method: CommunityTheme class>>dbAqua (in category 'colors by purpose') -----
  dbAqua        
+ 	^ Color r: 0.2 g: 0.4 b: 0.4!
- 	^Color r: 0.542 g: 0.745 b: 0.717!

Item was changed:
  ----- Method: CommunityTheme class>>dbBlue (in category 'colors by purpose') -----
  dbBlue         
+ 	^Color r: 0.406 g: 0.535 b: 0.645!
- 	^Color r: 0.506 g: 0.635 b: 0.745!

Item was changed:
  ----- Method: CommunityTheme class>>dbGreen (in category 'colors by purpose') -----
  dbGreen        
+ 	^(Color r: 0.33 g: 0.542 b: 0.287)!
- 	^Color r: 0.71 g: 0.741 b: 0.408!

Item was changed:
  ----- Method: CommunityTheme class>>dbOrange (in category 'colors by purpose') -----
  dbOrange       
+ 	^Color r: 0.4 g:  0.2666 b: 0.172!
- 	^Color r: 0.871 g: 0.577 b: 0.372!

Item was changed:
  ----- Method: CommunityTheme class>>dbRed (in category 'colors by purpose') -----
  dbRed 
+ 	^Color r: 0.6 g: 0.3 b: 0.3!
- 	^Color r: 0.8 g: 0.4 b: 0.4!

Item was changed:
  ----- Method: CommunityTheme class>>dbYellow (in category 'colors by purpose') -----
  dbYellow       
+ 	^ (Color r: 0.554 g: 0.488 b: 0.134)!
- 	^Color r: 0.941 g: 0.776 b: 0.455!



More information about the Squeak-dev mailing list