--- a/git/GitTests.st	Sat Sep 29 21:09:30 2012 +0000
+++ b/git/GitTests.st	Sun Sep 30 08:42:35 2012 +0000
@@ -28,6 +28,17 @@
     "Created: / 19-09-2012 / 19:04:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!GitTests methodsFor:'private'!
+
+performTest
+
+    GitCommitterQuery answer: (GitSignature name: self class name email: (self class name , '@nowhere')) do:[
+        super performTest
+    ].
+
+    "Created: / 30-09-2012 / 10:02:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !GitTests methodsFor:'running'!
 
 setUp
@@ -53,7 +64,11 @@
     | repo wc file1_txt |
 
     repo := self repositoryNamed: 'test_repo_01'.
+    "
+    UserPreferences fileBrowserClass openOn: repo directory.    
+    "
     wc := repo workingCopy.
+    self assert: wc commit oid = (GitOid fromString:'541c09aa382a56ec87b813b3fb6ea84e17909889').
 
     "Modify some file"
     file1_txt := wc / 'file1.txt'.
@@ -67,7 +82,10 @@
     wc stage.
     wc commit: 'test_01a commit 1'.
 
-    self halt.
+    self assert: wc commit oid ~= (GitOid fromString:'541c09aa382a56ec87b813b3fb6ea84e17909889').
+    self assert: wc commit message = 'test_01a commit 1'.
+    self assert: wc commit parents size == 1.
+    self assert: wc commit parents anElement oid = (GitOid fromString:'541c09aa382a56ec87b813b3fb6ea84e17909889').
 
     "Created: / 19-09-2012 / 23:06:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !