--- a/SmalltalkLanguage.st	Tue Aug 21 19:51:30 2012 +0200
+++ b/SmalltalkLanguage.st	Tue Aug 21 19:54:48 2012 +0200
@@ -148,66 +148,14 @@
     "Created: / 16-08-2009 / 09:01:38 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
-!SmalltalkLanguage methodsFor:'utilities - source code'!
-
-methodTemplate
-    "return a method definition template string"
-
-    |s|
-
-    s := TextStream on:''.
-    s nextPutAll:
-'message selector and argument names
-    "comment stating purpose of this message"
-
-    |temporaries|
-
-    statement.
-    statement.
-
-    "
-     optional: comment giving example use
-    "
-'.
-    s cr.
-    s emphasis:(UserPreferences current commentEmphasisAndColor).
-    s nextPutAll:
-'"
- change the above template into real code;
- remove this comment.
- Then `accept'' either via the menu 
- or via the keyboard (usually CMD-A).
-
- You do not need this template; you can also
- select any existing methods code, change it,
- and finally `accept''. The method will then be
- installed under the selector as defined in the
- actual text - no matter which method is selected
- in the browser.
-
- Or clear this text, type in the method from scratch
- and install it with `accept''.
-"
-'.
-    ^ s contents
-!
-
-versionMethodTemplateForCVS
-    "careful to avoid expansion by cvs here!!"
-
-    ^ ('version\    ^ ''$' , 'Header$''') withCRs
-
-    "Created: / 21-08-2012 / 11:52:27 / cg"
-! !
-
 !SmalltalkLanguage class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/SmalltalkLanguage.st,v 1.18 2012-08-21 10:02:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SmalltalkLanguage.st,v 1.19 2012-08-21 17:54:48 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/SmalltalkLanguage.st,v 1.18 2012-08-21 10:02:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SmalltalkLanguage.st,v 1.19 2012-08-21 17:54:48 cg Exp $'
 !
 
 version_SVN