equal
deleted
inserted
replaced
7 inclusion of the above copyright notice. This software may not |
7 inclusion of the above copyright notice. This software may not |
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 |
|
13 |
|
14 |
|
15 "{ Package: 'stx:libtool2' }" |
12 "{ Package: 'stx:libtool2' }" |
|
13 |
|
14 "{ NameSpace: Smalltalk }" |
16 |
15 |
17 ResourceSelectionBrowser subclass:#MethodSelectionBrowser |
16 ResourceSelectionBrowser subclass:#MethodSelectionBrowser |
18 instanceVariableNames:'' |
17 instanceVariableNames:'' |
19 classVariableNames:'' |
18 classVariableNames:'' |
20 poolDictionaries:'' |
19 poolDictionaries:'' |
191 message := message replChar:$ withString: ' class ' |
190 message := message replChar:$ withString: ' class ' |
192 ]. |
191 ]. |
193 ^message |
192 ^message |
194 ! ! |
193 ! ! |
195 |
194 |
196 !MethodSelectionBrowser methodsFor:'startup / release'! |
195 !MethodSelectionBrowser methodsFor:'startup & release'! |
197 |
196 |
198 postBuildWith:aBuilder |
197 postBuildWith:aBuilder |
199 "sets the correct title" |
198 "sets the correct title" |
200 |
199 |
201 title := 'Method Selection Browser'. |
200 title := 'Method Selection Browser'. |
239 !MethodSelectionBrowser class methodsFor:'documentation'! |
238 !MethodSelectionBrowser class methodsFor:'documentation'! |
240 |
239 |
241 version |
240 version |
242 ^ '$Header$' |
241 ^ '$Header$' |
243 ! ! |
242 ! ! |
|
243 |