more control over the shape style
authorClaus Gittinger <cg@exept.de>
Mon, 16 Sep 2013 12:56:06 +0200
changeset 3058 d7792b7a50b7
parent 3057 6a88cbfa2c3c
child 3059 cc9b8daf00bc
more control over the shape style (tooltips vs. window information)
FlyByWindowInformation.st
--- 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