78fd532000-07-12Mirar (Pontus Hagland) static private int stage=0; static private object defcal; static private multiset protect=(<"YMD">);
2cfe5c1998-04-29Mirar (Pontus Hagland) 
78fd532000-07-12Mirar (Pontus Hagland) #include "localization.h"
2cfe5c1998-04-29Mirar (Pontus Hagland) 
78fd532000-07-12Mirar (Pontus Hagland) #if 1 mixed `[](string what)
a2cf041999-05-27Mirar (Pontus Hagland) {
78fd532000-07-12Mirar (Pontus Hagland)  if ( protect[what] ) return ([])[0]; if (!defcal)
aa588f1999-05-30Mirar (Pontus Hagland)  {
78fd532000-07-12Mirar (Pontus Hagland)  if (stage) return ([])[0]; stage++; defcal=master()->resolv("Calendar")[default_calendar];
aa588f1999-05-30Mirar (Pontus Hagland)  }
78fd532000-07-12Mirar (Pontus Hagland)  if (what=="II") return 1; // Calendar.II return defcal[what];
a2cf041999-05-27Mirar (Pontus Hagland) }
78fd532000-07-12Mirar (Pontus Hagland) mixed `-> = `[]; #endif