#DOCUMENTATION by exept
authorClaus Gittinger <cg@exept.de>
Sat, 02 Nov 2019 00:11:58 +0100
changeset 4392 be4dc55a4960
parent 4391 87ceb93d9ad1
child 4393 001140ff0138
#DOCUMENTATION by exept class: FlyByHelp changed: #initiateHelpFor:at:now:
FlyByHelp.st
--- a/FlyByHelp.st	Fri Nov 01 12:32:29 2019 +0100
+++ b/FlyByHelp.st	Sat Nov 02 00:11:58 2019 +0100
@@ -698,6 +698,8 @@
 
     |text delayTime|
 
+    suspended == true ifTrue:[^ self].
+
     "/ Timestamp now infoPrint. ' initiate ' infoPrint. aView infoPrint. ' ' infoPrint. aPointOrNil infoPrintCR.
     Debugging ifTrue:[
         ('%1: initiateHelpFor:at:now: %2' bindWith:self className with:aView) infoPrintCR.