yes, that was me providing a compatibility/traduction layer :) you will find a couple more of them in the image. I call them “normalisation methods”: they are meant to translate names into something we can interpret… there is also some like that in the menu building if I remember well :P
Esteban > On 14 Oct 2016, at 15:34, Denis Kudriashov <[email protected]> wrote: > > Oh!!! I just found this method: > > iconNamed: aSymbol ifNone: aBlock > > self icons at: aSymbol asSymbol ifPresent: [ :icon | ^ icon ]. > "Trying the old way" > > ((aSymbol endsWith: 'Icon') or: [ (aSymbol endsWith: 'Form') ]) ifTrue: > [ > self icons > at: (aSymbol allButLast: 4) asSymbol > ifPresent: [ :icon | ^ icon ] > ]. > > ^ aBlock value > > > > 2016-10-14 11:42 GMT+02:00 Denis Kudriashov <[email protected] > <mailto:[email protected]>>: > > 2016-10-13 20:27 GMT+02:00 stepharo <[email protected] > <mailto:[email protected]>>: > Denis > You can have a look the changes I did. There is more work to be done but I > started. > https://pharo.fogbugz.com/f/cases/19201/iconNamed-part-4 > <https://pharo.fogbugz.com/f/cases/19201/iconNamed-part-4> > Done. New slice committed >
