#OTHER by cg
authorClaus Gittinger <cg@exept.de>
Tue, 16 Jan 2018 22:13:52 +0100
changeset 17901 a5dd0226df2c
parent 17900 fafb77eead65
child 17902 57a4b36b1f84
#OTHER by cg big refactoring: replaced all flyByHelpXXX sends and implementations by helpXXX. This should remove the confusion on where the tooltips should be stored and which methods need to be redefined. ATTENTION: May introduce temporary inconveniences until all other applications (in exept:xxx packages) are changed.
Tools__NewSystemBrowser.st
--- a/Tools__NewSystemBrowser.st	Tue Jan 16 22:13:48 2018 +0100
+++ b/Tools__NewSystemBrowser.st	Tue Jan 16 22:13:52 2018 +0100
@@ -241,12 +241,12 @@
 
 !NewSystemBrowser class methodsFor:'help specs'!
 
-flyByHelpSpec
+helpSpec
     <resource: #help>
 
     |spec manager|
 
-    spec := super flyByHelpSpec addPairsFrom:#(
+    spec := super helpSpec addPairsFrom:#(
 
 #fuzzyClassNameSearch
 'If checked, a more powerful fuzzy string compare is used.\If not, a substring is searched.'
@@ -25498,10 +25498,10 @@
 
 !NewSystemBrowser methodsFor:'help specs'!
 
-flyByHelpSpec
+helpSpec
     |changeSet spec|
 
-    spec := super flyByHelpSpec.
+    spec := super helpSpec.
 
     changeSet := ChangeSet current.
     "/ (changeSet contains:[:chg | chg isMethodChange and:[chg changeClass notNil]]) ifTrue:[
@@ -25519,7 +25519,7 @@
     "Modified: / 08-09-2011 / 05:05:06 / cg"
 !
 
-flyByHelpTextFor:aWidget at:aPoint
+helpTextFor:aWidget at:aPoint
     |action info label|
 
     (navigationState notNil and:[navigationState canvas]) notNil ifTrue:[