--- a/Metaclass.st	Thu Sep 24 12:11:45 2009 +0200
+++ b/Metaclass.st	Thu Sep 24 12:41:11 2009 +0200
@@ -660,6 +660,12 @@
         methodFilter:methodFilter encoder:encoderOrNil
 ! !
 
+!Metaclass methodsFor:'method templates'!
+
+versionMethodTemplateForSourceCodeManager:aSourceCodeManager
+    ^ aSourceCodeManager versionMethodTemplateForSmalltalk
+! !
+
 !Metaclass methodsFor:'private'!
 
 setSoleInstance:aClass 
@@ -854,7 +860,7 @@
 !Metaclass class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Metaclass.st,v 1.201 2009-09-21 14:45:17 fm Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Metaclass.st,v 1.202 2009-09-24 10:41:11 fm Exp $'
 ! !
 
 Metaclass initialize!