diff -r c8e0136dc692 -r 3db21bf80a51 UIHelpTool.st --- a/UIHelpTool.st Mon Aug 28 19:48:41 2006 +0200 +++ b/UIHelpTool.st Tue Aug 29 13:23:02 2006 +0200 @@ -1040,24 +1040,26 @@ ! cancel - "cancel modifications, reload helpText - " + "cancel modifications, reload helpText" + |item contents modified| item := keyItemModel value. modified := false. item notNil ifTrue:[ - contents := item helpText. + contents := item helpText. ] ifFalse:[ - contents := nil. + contents := nil. - modifiedHolder isNil ifTrue:[ - modified := self helpKey notNil - ] + modifiedHolder isNil ifTrue:[ + modified := self helpKey notNil + ] ]. helpTextView contents:contents. contentsModifiedChannel value:modified. + + "Modified: / 29-08-2006 / 10:20:37 / cg" ! doDelete