[squeak-dev] The Trunk: Morphic-mt.1467.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Nov 15 11:15:18 UTC 2018


Marcel Taeumel uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-mt.1467.mcz

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

Name: Morphic-mt.1467
Author: mt
Time: 15 November 2018, 12:14:27.981757 pm
UUID: fd0b1aac-d448-8d47-ba49-dc659c099ee6
Ancestors: Morphic-pre.1466

Fixes small bug in Morph border initialization.

=============== Diff against Morphic-pre.1466 ===============

Item was changed:
  ----- Method: Morph>>borderColor: (in category 'accessing') -----
  borderColor: aColorOrSymbolOrNil 
  
  	self flag: #compatibility. "mt: For old code. Should be removed in the future."
  	aColorOrSymbolOrNil
  		ifNil: [self borderStyle: nil]
  		ifNotNil: [:colorOrSymbol |
  			colorOrSymbol isSymbol ifTrue: [
  				^ self borderStyle: ((self borderStyleForSymbol: colorOrSymbol)
  											width: self borderStyle width;
  											baseColor: self borderStyle baseColor;
  											trackColorFrom: self;
  											yourself)]].
  
+ 	"Ensure a style object that can remember width and color."
+ 	self borderStyle style = #none
+ 		ifTrue: [self borderStyle: BorderStyle simple].
+ 
  	"Set the color of the current border style."			
  	self borderStyle
  		baseColor: aColorOrSymbolOrNil;
  		trackColorFrom: self.
  
  	self changed.!



More information about the Squeak-dev mailing list