'From Squeak3.1alpha [latest update: #''Squeak3.1alpha'' of 28 February 2001 update 3905] on 5 April 2001 at 9:45:33 pm'! "Change Set: EventFix-ar Date: 5 April 2001 Author: Andreas Raab Fixes a bad bug in event handling code."! !PasteUpMorph methodsFor: 'event handling' stamp: 'ar 4/5/2001 21:42'! processEvent: anEvent using: defaultDispatcher "Reimplemented to install the receiver as the new ActiveWorld if it is one" | priorWorld result | self isWorldMorph ifFalse:[^super processEvent: anEvent using: defaultDispatcher]. priorWorld _ ActiveWorld. ActiveWorld _ self. result _ super processEvent: anEvent using: defaultDispatcher. ActiveWorld _ priorWorld. ^result! !