--- a/ProgrammingLanguage.st	Tue Feb 14 22:03:08 2012 +0000
+++ b/ProgrammingLanguage.st	Sat Feb 18 23:08:56 2012 +0000
@@ -445,6 +445,21 @@
 
 !ProgrammingLanguage methodsFor:'utilities - source code'!
 
+classTemplateFor: superClass in: category asNamespace: isNamespace private: isPrivate
+    "Returns a class template code"
+
+    ^String streamContents:[:code|
+        self 
+            writeComment: (StringCollection
+                with: 'No class template defined. Please define one in '
+                with: (self class name , '>>', thisContext selector))
+            on: code
+
+    ]
+
+    "Modified: / 18-02-2012 / 18:31:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 methodTemplate
     "return a method definition template string (or nil)"
 
@@ -469,7 +484,7 @@
 !
 
 version_SVN
-    ^ '$Id: ProgrammingLanguage.st 10771 2012-02-06 20:14:43Z vranyj1 $'
+    ^ '$Id: ProgrammingLanguage.st 10781 2012-02-18 23:08:56Z vranyj1 $'
 ! !
 
 ProgrammingLanguage initialize!