# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1516137241 -3600
# Node ID e7224542f1a3616244a2c1f4191f619da9f99c54
# Parent  39c519deb478bf6fc6b330ecaf228fc69f1843a4
#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.

diff -r 39c519deb478 -r e7224542f1a3 UISpecificationTool.st
--- a/UISpecificationTool.st	Tue Jan 16 22:13:29 2018 +0100
+++ b/UISpecificationTool.st	Tue Jan 16 22:14:01 2018 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1995 by eXept Software AG
               All Rights Reserved
@@ -345,29 +343,6 @@
 
 !UISpecificationTool methodsFor:'help'!
 
-basicFlyByHelpTextForKey:aKey
-    "activeHelp interface: return some help text for a key.
-     Redefined to ask the current components Spec first."
-
-    |helpText|
-
-    "/ first, ask the master (a hook for expecco, to provide different help texts)
-    masterApplication notNil ifTrue:[
-        helpText := masterApplication basicFlyByHelpTextForKey:aKey.
-        helpText notNil ifTrue:[^ helpText ].
-
-        "/ then, ask the master about the spec
-        helpText := masterApplication basicHelpTextFromSpecification:specification forKey:aKey.
-    ] ifFalse:[
-        "/ then, ask the spec
-        helpText := (specification helpSpec) at:aKey ifAbsent:nil.
-    ].
-    helpText notNil ifTrue:[^ helpText ].
-
-    "/ finally, ask myself...
-    ^ super basicFlyByHelpTextForKey:aKey.
-!
-
 basicHelpTextForKey:aKey
     "activeHelp interface: return some help text for a key.
      Redefined to ask the current components Spec first."