--- a/ColorEditDialog.st	Fri Jun 04 16:54:05 2004 +0200
+++ b/ColorEditDialog.st	Mon Jun 07 11:27:44 2004 +0200
@@ -46,7 +46,7 @@
                                                                                 [exBegin]                                      
     |editor color|
 
-    editor := ColorEditor new.
+    editor := ColorEditDialog new.
     editor color:(Color green).
     editor open.
     editor accepted ifTrue:[