--- a/UISpecificationTool.st Thu May 21 16:35:09 2009 +0200
+++ b/UISpecificationTool.st Thu May 21 16:35:33 2009 +0200
@@ -354,10 +354,13 @@
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.
].
-
- "/ then, ask the spec
- helpText := (specification helpSpec) at:aKey ifAbsent:nil.
helpText notNil ifTrue:[^ helpText ].
"/ finally, ask myself...
@@ -374,10 +377,13 @@
masterApplication notNil ifTrue:[
helpText := masterApplication basicHelpTextForKey: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.
].
-
- "/ then, ask the spec
- helpText := (specification helpSpec) at:aKey ifAbsent:nil.
helpText notNil ifTrue:[^ helpText ].
"/ finally, ask myself...