# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1535450347 -7200
# Node ID 9e8f684dcb624bf269b16a7dcadeea11ef026773
# Parent  53631bb11cd1f2b13056c086bedd46dab6782b50
#REFACTORING by cg
class: ProgrammingLanguage
added: #methodSourceForVersionMethodCVS:

diff -r 53631bb11cd1 -r 9e8f684dcb62 ProgrammingLanguage.st
--- a/ProgrammingLanguage.st	Tue Aug 28 11:33:07 2018 +0200
+++ b/ProgrammingLanguage.st	Tue Aug 28 11:59:07 2018 +0200
@@ -558,6 +558,15 @@
 
 !ProgrammingLanguage methodsFor:'utilities - source code'!
 
+methodSourceForVersionMethodCVS:versionString
+    |generatorClass|
+
+    (generatorClass := self codeGeneratorClass) isNil ifTrue:[^ nil].
+    ^ generatorClass methodSourceForVersionMethodCVS:versionString
+
+    "Created: / 28-08-2018 / 11:52:41 / Claus Gittinger"
+!
+
 methodTemplate
     "return a method definition template string (or nil)"