equal
deleted
inserted
replaced
94 " |
94 " |
95 UIHelpTool openOnClass:self |
95 UIHelpTool openOnClass:self |
96 " |
96 " |
97 |
97 |
98 "Modified: / 20.5.1998 / 01:06:14 / cg" |
98 "Modified: / 20.5.1998 / 01:06:14 / cg" |
|
99 ! |
|
100 |
|
101 openOnClass:aClass andSelector: aSelector |
|
102 "opens a Help Tool on aClass and aSelector" |
|
103 |
|
104 ^self openOnClass:aClass andSelector: aSelector |
|
105 |
99 ! ! |
106 ! ! |
100 |
107 |
101 !UIHelpTool class methodsFor:'constants'! |
108 !UIHelpTool class methodsFor:'constants'! |
102 |
109 |
103 label |
110 label |
1060 |
1067 |
1061 super openInterface: #windowSpecForStandAlone. |
1068 super openInterface: #windowSpecForStandAlone. |
1062 self masterApplication isNil ifTrue: [(builder componentAt: #RemoveButton) beInvisible]. |
1069 self masterApplication isNil ifTrue: [(builder componentAt: #RemoveButton) beInvisible]. |
1063 builder window label: 'Help Tool'. |
1070 builder window label: 'Help Tool'. |
1064 self buildFromClass: aClass |
1071 self buildFromClass: aClass |
|
1072 ! |
|
1073 |
|
1074 openOnClass:aClass andSelector: aSelector |
|
1075 "opens the UIHelpTool on aClass and aSelector" |
|
1076 |
|
1077 super openInterface: #windowSpecForStandAlone. |
|
1078 self masterApplication isNil ifTrue: [(builder componentAt: #RemoveButton) beInvisible]. |
|
1079 builder window label: 'Help Tool'. |
|
1080 self buildFromClass: aClass andSelector: aSelector |
1065 ! ! |
1081 ! ! |
1066 |
1082 |
1067 !UIHelpTool methodsFor:'user actions'! |
1083 !UIHelpTool methodsFor:'user actions'! |
1068 |
1084 |
1069 accept |
1085 accept |