8  be provided or otherwise made available to, or used by, any

     8  be provided or otherwise made available to, or used by, any

     9  other person.  No title to or ownership of the software is

     9  other person.  No title to or ownership of the software is

    10  hereby transferred.

    10  hereby transferred.

    11 "

    11 "

    12 "{ Package: 'stx:libtool2' }"

    12 "{ Package: 'stx:libtool2' }"

    13 

    15 

    14 ResourceSpecEditor subclass:#UIHelpTool

    16 ResourceSpecEditor subclass:#UIHelpTool

    15 	instanceVariableNames:'classItemList classItemModel keyItemModel helpTextView

    17 	instanceVariableNames:'classItemList classItemModel keyItemModel helpTextView

    16 		modifiedHolder contentsModifiedChannel editModel'

    18 		modifiedHolder contentsModifiedChannel editModel'

    17 	classVariableNames:''

    19 	classVariableNames:''

   724     (specClass isClass and:[specClass isLoaded]) ifTrue:[

   726     (specClass isClass and:[specClass isLoaded]) ifTrue:[

   725         lastContents := nil.

   727         lastContents := nil.

   726 

   728 

   727         self addHistoryEntryForClass:specClass selector:helpSpecSelector.

   729         self addHistoryEntryForClass:specClass selector:helpSpecSelector.

   728 

   730 

   730             lastContents isNil ifTrue:[

   732             lastContents isNil ifTrue:[

   731                 aClass == ApplicationModel ifTrue:[ 

   733                 aClass == ApplicationModel ifTrue:[ 

   732                     lastContents := IdentityDictionary new

   734                     lastContents := IdentityDictionary new

   733                 ].

   735                 ].

   734             ] ifFalse:[

   736             ] ifFalse:[