[squeak-dev] computers too fast these days?

18 Aug 2013


      I've often wondered why, when I search for some string that isn't there, 
I see the text morph flash sometimes, but not always. Here's a fix.
Cheers,
Bob
'From Squeak4.4 of 1 March 2013 [latest update: #12489] on 18 August 
2013 at 11:49:45 am'!
!Morph methodsFor: 'macpal' stamp: 'raa 8/18/2013 06:44'!
flash
     | originalColor |
     originalColor := self color.
     [ self color:
         (originalColor
             ifNil: [ Color black ]
             ifNotNil: [ (originalColor alpha: 1) negated ]) ]
         ensure:
             [ self world ifNotNil: [ : w | w displayWorldSafely. (Delay 
forMilliseconds: 100) wait ].
             self color: originalColor ]! !