Sean could you have a look? Because when I tried to click on Balloon-CamilloBruni.85.mcz in PharoInbox
I get a month as 13
asDateFromZip
"See Date>>zipped comment"
| yearsSinceDosEpoch month day year |
yearsSinceDosEpoch := self >> 9. "High 7 bits"
month := self >> 5 & 2r1111. "Middle 4 bits"
day := self & 2r11111. "Low 5 bits"
year := DateAndTime dosEpoch year + yearsSinceDosEpoch.
^ Date year: year month: month day: day.
