equal
deleted
inserted
replaced
1941 (aResourceSpec class == Menu ifTrue: [aResourceSpec] ifFalse: [aResourceSpec decodeAsLiteralArray]) |
1941 (aResourceSpec class == Menu ifTrue: [aResourceSpec] ifFalse: [aResourceSpec decodeAsLiteralArray]) |
1942 ! ! |
1942 ! ! |
1943 |
1943 |
1944 !MenuEditor methodsFor:'change & update'! |
1944 !MenuEditor methodsFor:'change & update'! |
1945 |
1945 |
|
1946 update:something with:aParameter from:changedObject |
|
1947 super update:something with:aParameter from:changedObject. |
|
1948 |
|
1949 changedObject == (aspects at:#retriever) ifTrue:[ |
|
1950 self updateListOfImages |
|
1951 ]. |
|
1952 |
|
1953 "Modified: / 24.8.1998 / 21:47:48 / cg" |
|
1954 ! |
|
1955 |
1946 updateChannels |
1956 updateChannels |
1947 "update channels" |
1957 "update channels" |
1948 |
1958 |
1949 |node parent next state| |
1959 |node parent next state| |
1950 |
1960 |
2003 |
2013 |
2004 self listOfImages contents: |
2014 self listOfImages contents: |
2005 ((self class getAllImageSelectorsFrom: iconClass) |
2015 ((self class getAllImageSelectorsFrom: iconClass) |
2006 collect: [:sel| |image| image := iconClass perform: sel. LabelAndIcon icon:(image magnifiedBy: 22/image extent y ) string: sel]). |
2016 collect: [:sel| |image| image := iconClass perform: sel. LabelAndIcon icon:(image magnifiedBy: 22/image extent y ) string: sel]). |
2007 |
2017 |
2008 |
2018 "Modified: / 24.8.1998 / 21:29:24 / cg" |
2009 ! |
2019 ! |
2010 |
2020 |
2011 updateSelectionOfImage |
2021 updateSelectionOfImage |
2012 "updates the selection of image" |
2022 "updates the selection of image" |
2013 |
2023 |