[Pharo-users] Spec Tree Shortcuts

[Camillo Bruni]

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 ]

signature.asc
Description: Message signed with OpenPGP using GPGMail