I don't have a #labelColor: in my clean 3.6a image. Maybe you have
something else loaded?

Daniel

"Magistrello Alejandro (SFA)" <magistra at TELEFONICA.COM.AR> wrote:
> This message is in MIME format. Since your mail reader does not understand
> this format, some or all of this message may not be legible.
> 
> --Boundary_(ID_qv89gkzO47/M1TfIUl65xA)
> Content-type: text/plain
> Content-transfer-encoding: 7BIT
> 
> 
> from preamble:
> 
> "Change Set:		SystemWindowLabelColorfix-asm
> Date:			21 March 2003
> Author:			Alejandro Magistrello
> 
> to reproduce the bug:
> | window |
> 	window _ (SystemWindow labelled: 'changing the label color') model:
> nil.
> 	window labelColor: Color cyan.
> self currentWorld addMorph: window.
> window activate
> 
> this was introduced in 5123sysWindowIcons-nk 
> the colapseBox should be better drawn ;-)
> "!
> 
> regards, 
>    Alejandro
> 
>  <<SystemWinLabelColfix-asm.1.cs>> 
> 
> --Boundary_(ID_qv89gkzO47/M1TfIUl65xA)
> Content-type: application/octet-stream; name=SystemWinLabelColfix-asm.1.cs
> Content-transfer-encoding: quoted-printable
> Content-disposition: attachment; filename=SystemWinLabelColfix-asm.1.cs
> 
> 'From Squeak3.4gamma of ''7 January 2003'' [latest update: #5169] on 21 =
> March 2003 at 7:22:37 pm'!=0D"Change Set:		=
> SystemWindowLabelColorfix-asm=0DDate:			21 March 2003=0DAuthor:			=
> Alejandro Magistrello=0D=0Dto reproduce the bug:=0D| window |=0D	window =
> _ (SystemWindow labelled: 'changing the label color') model: nil.=0D	=
> window labelColor: Color cyan.=0Dself currentWorld addMorph: =
> window.=0Dwindow activate=0D=0Dthis was introduced in =
> 5123sysWindowIcons-nk =0Dthe colapseBox should be better drawn =
> .-=0D"!=0D=0D=0D!SystemWindow methodsFor: 'label' stamp: 'asm =
> 
> 3/21/2003 19:04'!=0DlabelColor: aColor
> 	label color: aColor.
> 	closeBox labelGraphic: (self class closeBoxImage deepCopy =
> replaceColor: Color black withColor: aColor ).
> 	collapseBox labelGraphic: (self class collapseBoxImage deepCopy =
> replaceColor: Color black withColor: aColor ).! !=0D=0D=0D!SystemWindow =
> class methodsFor: 'instance creation' stamp: 'asm 3/21/2003 =
> 19:08'!=0DcollapseBoxImage=0D	"Supplied here because we don't =
> necessarily have ComicBold"=0D=0D	^ CollapseBoxImage ifNil: [ =
> CollapseBoxImage _ (Form=0D	extent: 10 at 10=0D	depth: 16=0D	fromArray: #( =
> 0 65536 65536 65536 0 0 65536 65536 65536 65536 65536 65536 0 0 65536 =
> 65536 0 0 0 65536 65536 0 0 0 65536 65536 0 0 0 65536 65536 0 0 0 65536 =
> 65536 65536 0 0 65536 0 65536 65536 65536 65536 0 65536 65536 65536 0)=0D	=
> offset: 0 at 0)]! !=0D=0D"Postscript:"=0DSystemWindow classPool at: =
> #CollapseBoxImage put: nil!=0D=
> 
> --Boundary_(ID_qv89gkzO47/M1TfIUl65xA)
> MIME-version: 1.0
> Content-type: text/plain; charset=us-ascii
> Content-transfer-encoding: 7BIT
> 
> 
> 
> --Boundary_(ID_qv89gkzO47/M1TfIUl65xA)--