On Oct 15, 2013, at 6:15 PM, Camillo Bruni <camillobruni@gmail.com> wrote:

What is the current way to add shortcuts to the a TreeModel?
I am a bit lost, since I thought I just do something like this:

tree
^ tree ifNil: [
tree := self instantiate: TreeModel.
tree whenBuiltDo: [ self initializeShortcuts ]].

initializeShortcuts
self shortCuts keysAndValuesDo: [ :key :value |
self tree bindKeyCombination: key toAction: value ]