#REFACTORING by cg
class: CVSSourceCodeManager class
changed:
#checkinClass:fileName:directory:module:source:logMessage:force:asBranch:
#pathesForClasses:
warn:with: used
--- a/CVSSourceCodeManager.st Tue Jul 09 20:49:07 2019 +0200
+++ b/CVSSourceCodeManager.st Wed Jul 10 18:21:08 2019 +0200
@@ -2771,14 +2771,14 @@
Delay waitForSeconds:0.5.
ex restart.
].
- Dialog warn:('Warning: some problem encountered when trying to remove a temporary workfile:
+ Dialog warn:'Warning: some problem encountered when trying to remove a temporary workfile:
%1
The checkin was successful, though.
This may be caused by a virus scanner, or other program which scans the temporary file.
Please remove those temporary files later.' withCRs
- bindWith:ex description).
+ with:ex description.
ex proceed.
] do:[
tempdir notNil ifTrue:[ tempdir recursiveRemove. tempdir := nil. ].
@@ -2898,7 +2898,7 @@
"Modified: / 31-03-2017 / 15:42:32 / stefan"
"Modified: / 18-05-2018 / 12:53:43 / Stefan Vogel"
"Modified: / 09-11-2018 / 18:09:37 / Maren"
- "Modified: / 17-12-2018 / 16:29:02 / Claus Gittinger"
+ "Modified: / 10-07-2019 / 18:20:31 / Claus Gittinger"
!
checkoutModule:aModule directory:aPackage andDo:aBlock
@@ -4255,7 +4255,7 @@
cls isLoaded ifFalse:[
Transcript showCR:'Cannot handle unloaded class: %1.' with:cls name.
alreadyWarned == 0 ifTrue:[
- Dialog warn:('Cannot handle unloaded class: %1.' bindWith:cls name).
+ Dialog warn:'Cannot handle unloaded class: %1.' with:cls name.
alreadyWarned := alreadyWarned + 1.
] ifFalse:[
alreadyWarned == 1 ifTrue:[
@@ -4285,7 +4285,7 @@
^ paths
"Created: / 04-12-2017 / 18:48:30 / cg"
- "Modified: / 15-02-2019 / 09:42:02 / Claus Gittinger"
+ "Modified: / 10-07-2019 / 18:20:48 / Claus Gittinger"
!
readRevisionLogFromStream:aCVSLogPipeStream headerOnly:headerOnly numRevisions:numRevisionsOrNil