author | Claus Gittinger <cg@exept.de> |
Tue, 30 Jan 2018 20:04:41 +0100 | |
changeset 5697 | 50109970c6bb |
parent 5695 | 0e68bf885fa0 |
child 5698 | cbb99238ece2 |
ImageEditView.st | file | annotate | diff | comparison | revisions |
--- a/ImageEditView.st Thu Jan 25 21:43:37 2018 +0100 +++ b/ImageEditView.st Tue Jan 30 20:04:41 2018 +0100 @@ -2506,7 +2506,7 @@ draw := [:point | (clr := self drawingColorOrNil) notNil ifTrue:[ - clr isPseudoColor ifTrue:[ + (clr isPseudoColor and:[image hasAlphaChannel]) ifTrue:[ "/ only set the alpha value newColor := (image colorAt:point) alpha:clr alpha. ] ifFalse:[