--- a/mercurial/HGTests.st	Sat Nov 19 22:36:18 2016 +0000
+++ b/mercurial/HGTests.st	Tue Nov 22 20:11:53 2016 +0000
@@ -1400,23 +1400,27 @@
         UserPreferences current hgCommand: ('python "%1"' bindWith: pathOfHgCommand).
         cmd := HGCommand commit message:'123'.
         self assert: (cmd executable = pathOfPython).
-        self assert: (cmd arguments size == 6).
+        self assert: (cmd arguments size == 8).
         self assert: (cmd arguments at:1) = pathOfPython.
         self assert: (cmd arguments at:2) = pathOfHgCommand.
-        self assert: (cmd arguments at:3) = '--noninteractive'.
-        self assert: (cmd arguments at:4) = 'commit'.
-        self assert: (cmd arguments at:5) = '-m'.
+        self assert: (cmd arguments at:3) = '--noninteractive'.	
+        self assert: (cmd arguments at:4) = '--config'.
+        self assert: (cmd arguments at:5) = 'extensions.share='.
+        self assert: (cmd arguments at:6) = 'commit'.
+        self assert: (cmd arguments at:7) = '-m'.
 
         HGCommand hgCommand: nil.
         UserPreferences current hgCommand: ('"%1" "%2"' bindWith: pathOfPython with: pathOfHgCommand).         
         cmd := HGCommand commit message:'123'.
         self assert: (cmd executable = pathOfPython).
-        self assert: (cmd arguments size == 6).
+        self assert: (cmd arguments size == 8).
         self assert: (cmd arguments at:1) = pathOfPython.
         self assert: (cmd arguments at:2) = pathOfHgCommand.
         self assert: (cmd arguments at:3) = '--noninteractive'.
-        self assert: (cmd arguments at:4) = 'commit'.
-        self assert: (cmd arguments at:5) = '-m'. 
+        self assert: (cmd arguments at:4) = '--config'.
+        self assert: (cmd arguments at:5) = 'extensions.share='. 
+        self assert: (cmd arguments at:6) = 'commit'.
+        self assert: (cmd arguments at:7) = '-m'. 
     ] ensure:[ 
         UserPreferences current hgCommand: savedHgCommand. 
         HGCommand hgCommand: nil.