--- a/FlyByHelp.st	Tue May 23 16:16:31 2017 +0200
+++ b/FlyByHelp.st	Tue Jun 06 15:07:07 2017 +0200
@@ -464,7 +464,8 @@
 
     showTime := self showTime.
     (showTime notNil and:[showTime > 0]) ifTrue:[
-        closeProcess := [
+        p :=
+            [
                 [
                     (Delay forSeconds:showTime) wait.
                     [
@@ -476,15 +477,16 @@
                         ]
                     ] valueUninterruptably
                 ] ifCurtailed:[
-                    closeProcess := nil.
+                    (p == closeProcess) ifTrue:[ closeProcess := nil ].
                 ].
             ] newProcess.
-        closeProcess priority:(Processor userSchedulingPriority + 1).
-        closeProcess resume.
+        p priority:(Processor userSchedulingPriority + 1).
+        closeProcess := p.
+        p resume.
     ].
 
     "Modified: / 31-08-1995 / 19:20:45 / claus"
-    "Modified: / 17-11-2016 / 22:11:37 / cg"
+    "Modified: / 06-06-2017 / 15:06:41 / cg"
 !
 
 stopHelpDisplayProcess