changeset 4059 | 612726a08954 |
parent 4050 | 5a4fb030d8fd |
child 4063 | 31ea26b7f26e |
--- a/ApplicationModel.st Fri Jan 26 10:45:18 2018 +0100 +++ b/ApplicationModel.st Wed Jan 31 00:06:39 2018 +0100 @@ -1,3 +1,5 @@ +"{ Encoding: utf8 }" + " COPYRIGHT (c) 1995 by Claus Gittinger All Rights Reserved @@ -2653,6 +2655,10 @@ helpText isNil ifTrue:[ "there is no help text - resolve key from resources" helpText := (self translateString:aKey) withCRs. + helpText = aKey ifTrue:[ + "/ nothing came... + ^ nil + ]. ]. ^ helpText. ].