--- a/SmalltalkChunkFileSourceWriter.st Tue Feb 03 20:01:47 2015 +0100
+++ b/SmalltalkChunkFileSourceWriter.st Tue Feb 03 20:14:15 2015 +0100
@@ -589,6 +589,8 @@
"/ this is required because we cannot save an SVN version method (dollar-ID-...-dollar) into a
"/ CVS repository without loosing the original string with the next checkout, because it also gets
"/ expanded by CVS. The same is true vice-versa for CVS-Ids, which get clobbered by SVN.
+ "/ also used, when generating sourcecode for another Smalltalk system (VSE fileout)
+
rewriteQuery := AbstractSourceFileWriter methodSourceRewriteQuery new.
rewriteQuery method:aMethod source:source.
possiblyRewrittenSource := (rewriteQuery query) ? source.
@@ -706,11 +708,11 @@
!SmalltalkChunkFileSourceWriter class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/SmalltalkChunkFileSourceWriter.st,v 1.29 2015-01-28 18:09:12 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/SmalltalkChunkFileSourceWriter.st,v 1.30 2015-02-03 19:14:15 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/SmalltalkChunkFileSourceWriter.st,v 1.29 2015-01-28 18:09:12 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/SmalltalkChunkFileSourceWriter.st,v 1.30 2015-02-03 19:14:15 cg Exp $'
!
version_SVN