hmmm I think I confused myself :D, most probably I did not register
the commands on the outer widget, so the shortcuts do not work when
you don't have the focus on the tree :P


On 2013-10-15, at 18:50, Benjamin <benjamin.vanryseghem.pharo@gmail.com> wrote:

it does not work ?

Ben

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 ]