MenuEditor.st
changeset 1078 84683b5a6979
parent 1069 7196ca547f5d
child 1083 46a1cb1c595d
equal deleted inserted replaced
1077:46793bf50415 1078:84683b5a6979
  2188 ! !
  2188 ! !
  2189 
  2189 
  2190 !MenuEditor methodsFor:'selection'!
  2190 !MenuEditor methodsFor:'selection'!
  2191 
  2191 
  2192 imageSelected
  2192 imageSelected
  2193 
  2193     |imgSel|
  2194     (aspects at: #icon) value: self selectionOfImage value string
  2194 
  2195 
  2195     imgSel := self selectionOfImage value.
       
  2196     imgSel notNil ifTrue:[
       
  2197         (aspects at: #icon) value: imgSel string
       
  2198     ]
  2196 !
  2199 !
  2197 
  2200 
  2198 menuChanged
  2201 menuChanged
  2199 
  2202 
  2200     |node item slc sel old myClass|
  2203     |node item slc sel old myClass|