[squeak-dev] The Trunk: EToys-mt.390.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Apr 6 06:20:58 UTC 2020


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

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

Name: EToys-mt.390
Author: mt
Time: 6 April 2020, 8:20:52.721118 am
UUID: d3cd1e02-f1a6-bf44-9ad9-dadb30fc96a3
Ancestors: EToys-ct.389, EToys-kks.389

Merges fix in MonthMorph and WeekMorph as well as that slip with deprecated extensions in the no-longer-available TextMorphEditor in 6.0alpha.

Thanks Subbu (kks) and Christoph (ct)!

=============== Diff against EToys-eem.388 ===============

Item was changed:
  ----- Method: MonthMorph>>startMondayOrSundayString (in category 'controls') -----
  startMondayOrSundayString
+ 	^((Week startDay = #Monday)  ifTrue: ['start Sunday'] ifFalse: ['start Monday']) 
- 	^(Week startDay  ifTrue: ['start Sunday'] ifFalse: ['start Monday']) 
  		translated!

Item was removed:
- ----- Method: TextMorphEditor>>select (in category '*Etoys-Squeakland-current selection') -----
- select
- 	"Ignore selection redraw requests."!

Item was removed:
- ----- Method: TextMorphEditor>>selectionInterval: (in category '*Etoys-Squeakland-private') -----
- selectionInterval: anInterval
- 	"Make my selection span the indicated interval.  If the interval extends outside the range of characters of the current text, force it within."
- 
- 	| mySize |
- 	mySize := paragraph text string size.
- 	self selectFrom: (anInterval start min: mySize)
- 		to:	(anInterval stop min: mySize)!

Item was changed:
  ----- Method: WeekMorph>>selectedDates (in category 'all') -----
  selectedDates
  	| answer |
  	answer :=OrderedCollection new.
  	self submorphsDo:
  		[:each |
  		((each respondsTo: #onColor) and: [each color = each onColor])
  			ifTrue:
  				[answer add:
  					(Date
  						newDay: each label asNumber
+ 						month: week start monthName
+ 						year: week start year)]].
- 						month: week firstDate monthName
- 						year: week firstDate year)]].
  	^ answer sort!



More information about the Squeak-dev mailing list