hg/stx-libbasic: changeset 24828:b9a0ab03dd8f

author	Claus Gittinger <cg@exept.de>
	Thu, 10 Oct 2019 22:15:24 +0200
changeset 24828	b9a0ab03dd8f
parent 24827	2a6fd0e0cf01
child 24829	dc443836dfef

#BUGFIX by exept class: UserPreferences changed: #flyByHelpSettingChanged

--- a/UserPreferences.st	Thu Oct 10 22:09:17 2019 +0200
+++ b/UserPreferences.st	Thu Oct 10 22:15:24 2019 +0200
@@ -6421,11 +6421,16 @@
 
 flyByHelpSettingChanged
     FlyByHelp notNil ifTrue:[
-	(self at:#flyByHelpActive ifAbsent:true) ifTrue:[
-	    FlyByHelp start.
-	] ifFalse:[
-	    FlyByHelp stop.
-	].
+        (self at:#flyByHelpActive ifAbsent:true) ifTrue:[
+            FlyByHelp start.
+        ] ifFalse:[
+            FlyByHelp stop.
+        ].
+    ].
+    ActiveHelp notNil ifTrue:[
+        (self at:#flyByHelpActive ifAbsent:true) ifFalse:[
+            ActiveHelp stop.
+        ].
     ].
 ! !