#FEATURE by exept
authorClaus Gittinger <cg@exept.de>
Sun, 01 Dec 2019 05:23:25 +0100
changeset 4518 1e1874f7a287
parent 4517 8fbd240dfd1e
child 4519 e0aab139cd66
#FEATURE by exept class: CVSSourceCodeManager class changed: #checkin:text:directory:module:logMessage:force:onBranch: #checkinClass:fileName:directory:module:source:logMessage:force:asBranch:
CVSSourceCodeManager.st
--- a/CVSSourceCodeManager.st	Fri Nov 29 04:27:11 2019 +0000
+++ b/CVSSourceCodeManager.st	Sun Dec 01 05:23:25 2019 +0100
@@ -2087,6 +2087,12 @@
                     with:checkoutName
                     with:cmdOut name.
         ] ifTrue:[
+            self cvsExecutable asFilename baseName = 'jcvs' ifTrue:[
+                "/
+                "/ jCVS does not support -m with multiline strings
+                "/
+                logMsg := 'checkin via jcvs'.
+            ].
             "/
             "/ CVS up to V1.9.14 prints the 'new revision' to stderr,
             "/ CVS V1.9.16 to stdout.
@@ -2735,6 +2741,12 @@
 
             cmd := 'commit -F "', s fileName baseName, '" ', checkoutName, ' >', '"' , cmdOut name , '"'.
         ] ifTrue:[
+            self cvsExecutable asFilename baseName = 'jcvs' ifTrue:[
+                "/
+                "/ jCVS does not support -m with multiline strings
+                "/
+                logMsg := 'checkin via jcvs'.
+            ].
             "/
             "/ CVS up to V1.9.14 prints the 'new revision' to stderr,
             "/ CVS V1.9.16 to stdout.