The Trunk: EToys-mt.390.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: EToys-mt.390.mcz

commits-2
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!