--- a/ToolApplicationModel.st	Mon Feb 07 17:20:45 2000 +0100
+++ b/ToolApplicationModel.st	Tue Feb 08 11:51:20 2000 +0100
@@ -1060,6 +1060,10 @@
 showHelp:aHelpText for:view
     "displays aHelpText in the info label"
 
+    masterApplication notNil ifTrue:[
+        ^ masterApplication showHelp:aHelpText for:view
+    ].
+
     aHelpText isNil 
         ifTrue:  [self updateInfoLabel] 
         ifFalse: [self valueOfInfoLabel value: (aHelpText asString printString readStream through: $.)].
@@ -1269,5 +1273,5 @@
 !ToolApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.95 2000-02-03 17:33:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.96 2000-02-08 10:51:20 ca Exp $'
 ! !