Oct. 14, 2016
1:34 p.m.
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 <dionisiydk@gmail.com>:
2016-10-13 20:27 GMT+02:00 stepharo <stepharo@free.fr>:
Denis
You can have a look the changes I did. There is more work to be done but I started.
Done. New slice committed