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!