Branch: Tag:

2000-08-04

2000-08-04 08:58:46 by Mirar (Pontus Hagland) <pike@sort.mirar.org>

bugfix in backwards lookup

Rev: lib/modules/Calendar.pmod/Language.pmod:1.2

65:       int month_number_from_name(string name)    { -  int j=(month_s2n[lower_case(name)]); +  int j=(month_s2n[flat(name)]);    if (!j) error("no such month of year: %O\n",name);    return j;    }
82:       int week_day_number_from_name(string name)    { -  int j=(week_day_s2n[lower_case(name)]); +  int j=(week_day_s2n[flat(name)]);    if (!j) error("no such day of week: %O\n",name);    return j;    }
141:       int gregorian_week_day_number_from_name(string name)    { -  int j=(week_day_s2n[lower_case(name)]); +  int j=(week_day_s2n[flat(name)]);    if (!j) error("no such day of week: %O\n",name);    return j%7+1;    }
170:    return (["chaos":1,"discord":2,"confusion":3,    "bureaucracy":4,"the aftermath":5,    "chs":1,"dsc":2,"cfn":3,"bcy":4,"afm":5]) -  [lower_case(name)]; +  [flat(name)];    }       string discordian_week_day_shortname_from_number(int n)
191:    "prickleprickle":4,"setting":5,"orange":5,"tib":6,"tibs":6,    "sttib":6,"sttibs":6,"saint tib's day":6,    "sm":1,"bt":2,"pd":3,"pp":4,"so":5,"st":6]) -  [lower_case(name)]; +  [flat(name)];    }       string discordian_week_name_from_number(int n)
228:    "tou":1,"bab":2,"hat":3,"kia":4,"tob":5,    "ams":6,"bar":7,"bar":8,"pak":9,    "pao":10,"epe":11,"mes":12,"nas":13]) -  [lower_case(name)]; +  [flat(name)];    }       string coptic_year_name_from_number(int y)