--- a/mercurial/HGTests.st	Wed Feb 06 09:16:53 2013 +0100
+++ b/mercurial/HGTests.st	Wed Feb 06 10:23:53 2013 +0100
@@ -434,11 +434,12 @@
     wc := repo workingCopy. 
     ( wc / 'f1.txt' ) writingFileDo:[:s | s nextPutAll:'modified from test_commit_04 2'. ].
 
-    wc commit: 'test_commit_04 2' date: (Timestamp secondsSince1970:0).
+    wc commit: 'test_commit_04 2' date: '0 0'.
 
     cs := repo @ 5.
-    self assert: cs timestamp = (Timestamp secondsSince1970:0).
-    self assert: cs id printString = '5:0f1497773ce6'.
+    self assert: (cs timestamp printStringFormat: '%(year)-%(month)-%(day) %H:%m:%S')
+                    = '1970-01-01 1:00:0'.
+    self assert: cs id printString = '5:15e269cc7406'.
 
 
     "Now, fake missing ui.username config entry"
@@ -457,6 +458,7 @@
     "
 
     "Created: / 01-02-2013 / 14:46:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 06-02-2013 / 10:22:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !HGTests methodsFor:'tests - mercurial'!