--- a/CodeGeneratorTool.st	Thu Feb 10 16:58:13 2011 +0100
+++ b/CodeGeneratorTool.st	Thu Feb 10 16:58:16 2011 +0100
@@ -12,12 +12,12 @@
 "{ Package: 'stx:libtool' }"
 
 Object subclass:#CodeGeneratorTool
-        instanceVariableNames:'compositeChangeCollector compositeChangeNesting userPreferences
-                generateComments'
-        classVariableNames:'GenerateCommentsForGetters GenerateCommentsForSetters
-                CopyrightTemplate'
-        poolDictionaries:''
-        category:'Interface-Browsers'
+	instanceVariableNames:'compositeChangeCollector compositeChangeNesting userPreferences
+		generateComments'
+	classVariableNames:'GenerateCommentsForGetters GenerateCommentsForSetters
+		CopyrightTemplate'
+	poolDictionaries:''
+	category:'Interface-Browsers'
 !
 
 !CodeGeneratorTool class methodsFor:'documentation'!
@@ -121,6 +121,14 @@
     ^ self new createRedefinedInstanceCreationMethodsIn:aClass
 !
 
+createSingletonPatternInstanceCreationMethodsIn:aClass usingVariable:varName
+    "create redefined #new method for singleton pattern"
+
+    ^ self new createSingletonPatternInstanceCreationMethodsIn:aClass usingVariable:varName
+
+    "Created: / 10-02-2011 / 16:32:43 / cg"
+!
+
 createStartupCodeFor:aClass forStartOf:anApplicationClassOrNil
     "create standAloneStartup code"
 
@@ -1045,6 +1053,14 @@
     self subclassResponsibility
 !
 
+createSingletonPatternInstanceCreationMethodsIn:aClass usingVariable:varName
+    "create redefined #new methods for a singleton pattern"
+
+    self subclassResponsibility
+
+    "Created: / 10-02-2011 / 16:32:36 / cg"
+!
+
 createStandardPrintOnMethodIn:aClass
     "create a #printOn: method (I'm tired of typing)"
 
@@ -1406,9 +1422,9 @@
 !CodeGeneratorTool class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/CodeGeneratorTool.st,v 1.87 2011-01-28 09:22:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/CodeGeneratorTool.st,v 1.88 2011-02-10 15:58:16 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/CodeGeneratorTool.st,v 1.87 2011-01-28 09:22:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/CodeGeneratorTool.st,v 1.88 2011-02-10 15:58:16 cg Exp $'
 ! !