--- a/Tools__NewSystemBrowser.st	Thu Sep 11 17:12:43 2014 +0200
+++ b/Tools__NewSystemBrowser.st	Tue Sep 16 16:55:50 2014 +0200
@@ -27113,7 +27113,7 @@
     self categoryMenuCheckInEachUsing:SourceCodeManagerUtilities default
 !
 
-categoryMenuCheckInEachUsingManager:aSourceCodeManager
+categoryMenuCheckInEachUsingManager:aSourceCodeManagerOrNil
     "check all classes of all selected categories into the source repository"
 
     |classes|
@@ -27129,8 +27129,9 @@
     ].
     classes := classes asSortedCollection:[:a :b | a name < b name].
 
-    aSourceCodeManager utilities checkinClasses:classes.
-    self normalLabel.
+    self classMenuCheckIn:true classes:classes usingManager:aSourceCodeManagerOrNil
+    "/ aSourceCodeManager utilities checkinClasses:classes.
+    "/ self normalLabel.
 !
 
 categoryMenuCheckOut
@@ -57549,7 +57550,6 @@
     "Created: / 04-12-2011 / 22:22:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-
 !NewSystemBrowser methodsFor:'private-semantic checks'!
 
 checkAcceptedMethod:aMethod inClass:aClass
@@ -62058,11 +62058,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2109 2014-09-11 14:24:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2110 2014-09-16 14:55:50 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2109 2014-09-11 14:24:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2110 2014-09-16 14:55:50 cg Exp $'
 !
 
 version_HG
@@ -62071,7 +62071,7 @@
 !
 
 version_SVN
-    ^ '$Id: Tools__NewSystemBrowser.st,v 1.2109 2014-09-11 14:24:12 cg Exp $'
+    ^ '$Id: Tools__NewSystemBrowser.st,v 1.2110 2014-09-16 14:55:50 cg Exp $'
 ! !