--- a/CVSSourceCodeManager.st Tue Jun 25 17:21:08 2013 +0200
+++ b/CVSSourceCodeManager.st Tue Jun 25 19:13:26 2013 +0200
@@ -1996,7 +1996,7 @@
].
(binRevision := cls binaryRevision) notNil ifTrue:[
revision ~= binRevision ifTrue:[
- ('CVSSourceCodeManager [info]: class ' , className , ' is based upon ' , binRevision , ' but has revision ' , (revision ? '?')) infoPrintCR
+ Transcript showCR:('CVSSourceCodeManager [info]: class ' , className , ' is based upon ' , binRevision , ' but has revision ' , (revision ? '?'))
]
].
@@ -5191,11 +5191,11 @@
!CVSSourceCodeManager class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.463 2013-06-06 20:23:29 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.464 2013-06-25 17:13:26 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.463 2013-06-06 20:23:29 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.464 2013-06-25 17:13:26 cg Exp $'
! !