--- a/ActiveHelp.st Sat Sep 09 04:30:16 1995 +0200
+++ b/ActiveHelp.st Sat Sep 16 01:50:04 1995 +0200
@@ -24,7 +24,7 @@
version
"
-$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.5 1995-09-09 02:29:12 claus Exp $
+$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.6 1995-09-15 23:50:04 claus Exp $
"
!
@@ -332,10 +332,10 @@
hideIfPointerLeft:aView
|whereOnScreen p|
- showProcess notNil ifTrue:[
- p := showProcess. showProcess := nil.
- p terminate.
- ].
+"/ showProcess notNil ifTrue:[
+"/ p := showProcess. showProcess := nil.
+"/ p terminate.
+"/ ].
whereOnScreen := aView device pointerPosition.