# HG changeset patch # User Claus Gittinger # Date 1212138307 -7200 # Node ID c37fb02785bcd8c7a84fa21edf38aee22429671d # Parent d6fdeda319decab579ae9cd685c77bf6acc22b75 +openOn: diff -r d6fdeda319de -r c37fb02785bc ColorEditDialog.st --- a/ColorEditDialog.st Wed May 28 15:20:59 2008 +0200 +++ b/ColorEditDialog.st Fri May 30 11:05:07 2008 +0200 @@ -560,6 +560,19 @@ ) ! ! +!ColorEditDialog class methodsFor:'startup'! + +openOn:aColor + ^ self new + color:aColor; + open; + yourself + + " + self openOn:Color red + " +! ! + !ColorEditDialog methodsFor:'accessing'! color