changed:5 methods
authorClaus Gittinger <cg@exept.de>
Mon, 02 Nov 2009 15:55:15 +0100
changeset 2702 96f1dbce3d00
parent 2701 5abe05ebb370
child 2703 3ea780aba713
changed:5 methods
FlyByWindowInformation.st
--- a/FlyByWindowInformation.st	Mon Nov 02 15:48:22 2009 +0100
+++ b/FlyByWindowInformation.st	Mon Nov 02 15:55:15 2009 +0100
@@ -71,7 +71,8 @@
 !FlyByWindowInformation methodsFor:'event handling'!
 
 buttonMotion:buttonAndModifierState x:x y:y view:aView
-finished == true ifTrue:[self halt].
+    finished == true ifTrue:[^ self].
+
     super buttonMotion:buttonAndModifierState x:x y:y view:aView.
     ^ true
 !
@@ -83,7 +84,7 @@
 
 handleMouseIn:aView x:x y:y
 
-finished == true ifTrue:[self halt].
+    finished == true ifTrue:[^ self].
     super handleMouseIn:aView x:x y:y
 !
 
@@ -241,19 +242,20 @@
 !FlyByWindowInformation methodsFor:'start & stop'!
 
 initiateHelpFor:aView at:aPointOrNil
-finished == true ifTrue:[self halt].
+    finished == true ifTrue:[^ self].
     super initiateHelpFor:aView at:aPointOrNil 
 !
 
 initiateHelpFor:aView at:aPointOrNil now:showItNow
-finished == true ifTrue:[self halt].
+    finished == true ifTrue:[^ self].
     super initiateHelpFor:aView at:aPointOrNil now:showItNow
 !
 
 start
     |l|
 
-finished == true ifTrue:[self halt].
+    finished == true ifTrue:[^ self].
+
     l := FlyByHelp currentHelpListener.
     l notNil ifTrue:[
         FlyByHelp stop.