Find the last Sunday of each month: Difference between revisions
Content added Content deleted
| Line 2,713: | Line 2,713: | ||
firstDay := Date year: yr month: 1 day: 1. |
firstDay := Date year: yr month: 1 day: 1. |
||
firstSunday := firstDay addDays: (1 - firstDay dayOfWeek). |
firstSunday := firstDay addDays: (1 - firstDay dayOfWeek). |
||
(0 to: |
(0 to: 53) |
||
collect: [ :each | firstSunday addDays: (each * 7) ] |
collect: [ :each | firstSunday addDays: (each * 7) ] |
||
thenSelect: [ :each | |
thenSelect: [ :each | |
||