FlyByWindowInformation.st
changeset 3058 d7792b7a50b7
parent 2943 e7d181ac8f06
child 3065 311d632319d9
--- a/FlyByWindowInformation.st	Mon Sep 16 12:55:11 2013 +0200
+++ b/FlyByWindowInformation.st	Mon Sep 16 12:56:06 2013 +0200
@@ -286,6 +286,10 @@
 
 !FlyByWindowInformation methodsFor:'private'!
 
+activeHelpViewForApplication:applicationOrNil text:helpText onDevice:aDevice
+    ^ (ActiveHelpView for:helpText onDevice:aDevice) shapeStyle:nil.
+!
+
 handleMouseIn:aView x:x y:y
     finished == true ifTrue:[^ self].
     super handleMouseIn:aView x:x y:y