equal
deleted
inserted
replaced
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 |
12 |
13 |
13 |
|
14 |
|
15 "{ Package: 'stx:libtool2' }" |
14 |
16 |
15 ResourceSpecEditor subclass:#MenuEditor |
17 ResourceSpecEditor subclass:#MenuEditor |
16 instanceVariableNames:'treeView typeOfCanvas listOfCanvas listOfSlices |
18 instanceVariableNames:'treeView typeOfCanvas listOfCanvas listOfSlices |
17 lastImageRetriever slices' |
19 lastImageRetriever slices' |
18 classVariableNames:'' |
20 classVariableNames:'' |
1936 ]. |
1938 ]. |
1937 |
1939 |
1938 imageMethodSelectors := OrderedCollection new. |
1940 imageMethodSelectors := OrderedCollection new. |
1939 |
1941 |
1940 iconClass withAllSuperclasses do:[:cls | |
1942 iconClass withAllSuperclasses do:[:cls | |
1941 cls class methodDictionary keysAndValuesDo: [:sel :m | |
1943 cls class selectorsAndMethodsDo:[:sel :m | |
1942 ((r := m resourceType) == #image |
1944 ((r := m resourceType) == #image |
1943 or:[r == #programImage]) ifTrue:[ |
1945 or:[r == #programImage]) ifTrue:[ |
1944 imageMethodSelectors add:sel |
1946 imageMethodSelectors add:sel |
1945 ] |
1947 ] |
1946 ] |
1948 ] |