Open rgreat opened 2 weeks ago
unit uPascalTZ;
TPascalTZ.BareParseRule(const AIterator: TTZLineIterate);
Had to change from: NewRule.InMonth := MonthNumberFromShortName(TmpWord); to: NewRule.InMonth := MonthNumberFromShortName(Copy(TmpWord,1,3));
Thanks for reporting this issue.
The month parsing function has been adjusted to allow unabbreviated month names.
Unabbreviated month names first appeared in tzdata 2024b, e.g. "Mexico" rule definition.
unit uPascalTZ;
TPascalTZ.BareParseRule(const AIterator: TTZLineIterate);
Had to change from: NewRule.InMonth := MonthNumberFromShortName(TmpWord); to: NewRule.InMonth := MonthNumberFromShortName(Copy(TmpWord,1,3));