--- a/mercurial/HGCommandParserTests.st	Sat Nov 17 20:20:35 2012 +0000
+++ b/mercurial/HGCommandParserTests.st	Mon Nov 19 21:57:45 2012 +0000
@@ -93,6 +93,40 @@
     self assert: revs size == 2
 
     "Created: / 13-11-2012 / 17:31:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+test_version_2_3_3
+
+    | vsn |
+
+    vsn := (HGCommandParser on: 'Mercurial Distributed SCM (version 2.3.2)
+(see http://mercurial.selenic.com for more information)
+
+Copyright (C) 2005-2012 Matt Mackall and others
+This is free software; see the source for copying conditions. There is NO
+warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+') parseCommandVersion.
+
+    self assert: vsn = #(2 3 2)
+
+    "Created: / 19-11-2012 / 20:59:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+test_version_2_4
+
+    | vsn |
+
+    vsn := (HGCommandParser on: 'Mercurial Distributed SCM (version 2.4)
+(see http://mercurial.selenic.com for more information)
+
+Copyright (C) 2005-2012 Matt Mackall and others
+This is free software; see the source for copying conditions. There is NO
+warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+') parseCommandVersion.
+
+    self assert: vsn = #(2 4 nil)
+
+    "Created: / 19-11-2012 / 21:00:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !HGCommandParserTests class methodsFor:'documentation'!