Hi,

Morph>>flash states:

Morph>>flash
    | c w |
    c _ self color.
    self color: Color black.
    (w _ self world) ifNotNil: [w displayWorldSafely].
    self color: c

but,

Morph>>refreshWorld
      | aWorld |
      (aWorld _ self world) ifNotNil: [aWorld displayWorldSafely]

So, I think Morph>>flash should be something like:

Morph>>flash
    | c |
    c _ self color.
    self color: Color black.
    self refreshWorld.
    self color: c

the attached change correct this.

	Emilio <<Morph-flash.st>> 
-------------- next part --------------
A non-text attachment was scrubbed...
Name: Morph-flash.st
Type: application/octet-stream
Size: 249 bytes
Desc: not available
Url : http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20020620/6b784013/Morph-flash.obj