--- a/Date.st	Mon Mar 06 09:52:17 2006 +0100
+++ b/Date.st	Mon Mar 06 09:56:20 2006 +0100
@@ -188,9 +188,9 @@
                 MonthNames at:lang put:(resources array:enMonthNames).
                 MonthAbbrevs at:lang put:(resources array:monthAbbrevKeys).
                 "/ may needs special care (same key for long and short name)
-                may := resources at:'MAY_ABBREV' ifAbsent:nil.
+                may := resources string:'MAY_ABBREV' default:nil.
                 may isNil ifTrue:[
-                    may := resources at:'may'.
+                    may := resources string:'may'.
                 ].
                 (MonthAbbrevs at:lang) at:5 put:may.
             ].
@@ -2487,7 +2487,7 @@
 !Date class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Date.st,v 1.98 2005-09-26 15:24:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Date.st,v 1.99 2006-03-06 08:56:20 cg Exp $'
 ! !
 
 Date initialize!