--- 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.