diff -r f6a820ac5792 -r 11de50dd8c35 CVSSourceCodeManager.st --- a/CVSSourceCodeManager.st Wed Aug 28 10:07:42 2019 +0200 +++ b/CVSSourceCodeManager.st Wed Aug 28 10:39:24 2019 +0200 @@ -2198,7 +2198,7 @@ ]. binRevision := cls binaryRevision. (binRevision notNil and:[classRevision ~= binRevision]) ifTrue:[ - Transcript showCR:('CVSSourceCodeManager [info]: class ' , className , ' is based upon ' , binRevision , ' but has revision ' , (classRevision ? '?')) + Transcript showCR:'CVSSourceCodeManager [info]: class %1 is based upon %2 but has revision %3' with:className with:binRevision with:(classRevision ? '?'). ]. classRevision isNil ifTrue:[ @@ -2325,7 +2325,7 @@ newestRevision isNil ifTrue:[ newestRevision := self newestRevisionOf:cls. newestRevision isNil ifTrue:[ - (Dialog confirm:('The source container for ',cls name allBold,' seems corrupted. Proceed?' withCRs)) ifFalse:[ + (Dialog confirm:('The source container for %1 seems corrupted. Proceed?' bindWith:cls name allBold)) ifFalse:[ ^ false ]. ^ self @@ -2366,7 +2366,7 @@ "/ "/ no change "/ - Transcript showCR:'no change in ' , className , ' (repository unchanged)'. + Transcript showCR:'no change in %1 (repository unchanged)' with:className. force ifFalse:[ "/ (ChangeSet current includesChangeForClass:cls) ifTrue:[