--- a/RegressionTests__TimeAndDateTest.st Wed Aug 10 01:28:19 2011 +0200
+++ b/RegressionTests__TimeAndDateTest.st Wed Aug 10 01:37:18 2011 +0200
@@ -10,6 +10,12 @@
!
+!TimeAndDateTest class methodsFor:'others'!
+
+version_CVS
+ ^ '$Header$'
+! !
+
!TimeAndDateTest methodsFor:'Testing'!
test_01_ReadingTimes
@@ -55,24 +61,28 @@
self assert:(Date
readFrom:'2-may-2010'
printFormat:'%d-%shortMonthName-%y'
+ language:'en'
onError:[self error]
) = (Date newDay:2 month:5 year:2010).
self assert:(Date
readFrom:'2-may-2010'
printFormat:'%d-%monthName-%y'
+ language:'en'
onError:[self error]
) = (Date newDay:2 month:5 year:2010).
self assert:(Date
readFrom:'2-may-2010'
printFormat:'%d-%(shortMonthName)-%y'
+ language:'en'
onError:[self error]
) = (Date newDay:2 month:5 year:2010).
self assert:(Date
readFrom:'2-may-2010'
printFormat:'%d-%(monthName)-%y'
+ language:'en'
onError:[self error]
) = (Date newDay:2 month:5 year:2010).