--- a/AbstractSourceCodeManager.st	Tue Dec 05 20:33:07 2017 +0100
+++ b/AbstractSourceCodeManager.st	Tue Dec 05 20:33:28 2017 +0100
@@ -2197,14 +2197,9 @@
      Return true if ok, false if not."
 
     ^ self
-        checkinClass:aClass 
-        fileName:classFileName 
-        directory:packageDir 
-        module:moduleDir 
-        logMessage:logMessage
-        force:false
-
-    "Modified: 11.9.1996 / 16:15:43 / cg"
+        checkinClass:aClass fileName:classFileName directory:packageDir module:moduleDir logMessage:logMessage onBranch:nil
+
+    "Modified: / 05-12-2017 / 20:28:20 / cg"
 !
 
 checkinClass:aClass fileName:classFileName directory:packageDir module:moduleDir logMessage:logMessage force:force
@@ -2287,10 +2282,39 @@
     "Modified: / 30-04-2016 / 12:59:59 / cg"
 !
 
+checkinClass:aClass fileName:classFileName directory:packageDir module:moduleDir logMessage:logMessage onBranch:branchNameOrNil
+    "checkin of a class into the source repository.
+     Return true if ok, false if not."
+
+    ^ self
+        checkinClass:aClass 
+        fileName:classFileName 
+        directory:packageDir 
+        module:moduleDir 
+        logMessage:logMessage
+        force:false
+
+    "Created: / 05-12-2017 / 20:28:07 / cg"
+!
+
 checkinClass:aClass logMessage:logMessage
     "checkin of a class into the source repository.
      Return true if ok, false if not."
 
+    ^ self checkinClass:aClass logMessage:logMessage onBranch:nil
+
+    "
+     SourceCodeManager checkinClass:Array logMessage:'foo'
+    "
+
+    "Created: / 06-11-1995 / 18:56:00 / cg"
+    "Modified: / 05-12-2017 / 20:27:46 / cg"
+!
+
+checkinClass:aClass logMessage:logMessage onBranch:branchNameOrNil
+    "checkin of a class into the source repository.
+     Return true if ok, false if not."
+
     |sourceInfo packageDir moduleDir classFileName|
 
     sourceInfo := self sourceInfoOfClass:aClass.
@@ -2309,14 +2333,13 @@
         directory:packageDir 
         module:moduleDir 
         logMessage:logMessage
-
+        onBranch:branchNameOrNil
 
     "
      SourceCodeManager checkinClass:Array logMessage:'foo'
     "
 
-    "Created: / 06-11-1995 / 18:56:00 / cg"
-    "Modified: / 29-08-2006 / 12:46:28 / cg"
+    "Created: / 05-12-2017 / 20:27:33 / cg"
 !
 
 getFile:fileName revision:revision directory:packageDir module:moduleDir