--- a/RegressionTests__TimeAndDateTest.st	Mon Nov 05 14:30:04 2012 +0100
+++ b/RegressionTests__TimeAndDateTest.st	Mon Nov 05 14:31:53 2012 +0100
@@ -10,12 +10,6 @@
 !
 
 
-!TimeAndDateTest class methodsFor:'others'!
-
-version_CVS
-    ^ '$Header$'
-! !
-
 !TimeAndDateTest methodsFor:'Testing'!
 
 test_01_ReadingTimes
@@ -138,6 +132,16 @@
     self assert:(Date newDay:4 month:11 year:2012) weekInYear == 44.
     self assert:(Date newDay:12 month:11 year:2012) weekInYear == 46.
 
+    self assert:(Date newDay:29 month:12 year:2014) weekInYear == 1.    "/ YES!!
+    self assert:(Date newDay:30 month:12 year:2014) weekInYear == 1.    "/ YES!!
+    self assert:(Date newDay:31 month:12 year:2014) weekInYear == 1.    "/ YES!!
+    self assert:(Date newDay:1 month:1 year:2015) weekInYear == 1.
+    self assert:(Date newDay:2 month:1 year:2015) weekInYear == 1.
+    self assert:(Date newDay:3 month:1 year:2015) weekInYear == 1.
+    self assert:(Date newDay:4 month:1 year:2015) weekInYear == 1.
+
+    self assert:(Date newDay:5 month:1 year:2015) weekInYear == 2.
+
     "
      self new test_03_calenderWeek
     "
@@ -147,4 +151,8 @@
 
 version
     ^ '$Header$'
+!
+
+version_CVS
+    ^ '$Header$'
 ! !