--- a/SmalltalkCodeGeneratorTool.st	Sat Jan 29 15:25:54 2011 +0100
+++ b/SmalltalkCodeGeneratorTool.st	Sun Jan 30 01:46:13 2011 +0100
@@ -550,8 +550,10 @@
         or:[ (m sends:#initialize) not 
         or:[ 
             (Dialog 
-                confirmWithCancel:'The inherited #new method already seems to invoke #initialize. Redefine ?'
-                onCancel:[^ self]) ]]) ifTrue:[
+                confirmWithCancel:('The inherited #new method already seems to invoke #initialize.\Redefine ?' withCRs)
+                default:false
+                onCancel:[^ self] ) 
+        ]]) ifTrue:[
             code :=
 'new
     "return an initialized instance"
@@ -567,7 +569,8 @@
 
     self executeCollectedChangesNamed:('Add Initialized Instance Creation to ' , className).
 
-    "Created: / 11.10.2001 / 22:18:55 / cg"
+    "Created: / 11-10-2001 / 22:18:55 / cg"
+    "Modified: / 30-01-2011 / 00:58:04 / cg"
 !
 
 createParametrizedInstanceCreationMethodsNamed:selector in:aClass
@@ -2188,5 +2191,5 @@
 !SmalltalkCodeGeneratorTool class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/SmalltalkCodeGeneratorTool.st,v 1.1 2011-01-28 09:24:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SmalltalkCodeGeneratorTool.st,v 1.2 2011-01-30 00:46:13 cg Exp $'
 ! !