Levente Uzonyi uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-ul.406.mcz
==================== Summary ====================
Name: Morphic-ul.406 Author: ul Time: 31 March 2010, 2:52:31.159 am UUID: c723a9f7-df5f-3446-9729-e21a08cfa7d1 Ancestors: Morphic-ar.405, Morphic-klub.405
Merged klub.405:
- fix the missing keyboard shortcut for the search bar. Ctrl+<n> activates the search bar where n is an integer between 0 and 9 if there is no menu assigned to that number. The intended usage is Ctrl-0, but some keyboard layouts don't have a key for 0 without modifier keys.
=============== Diff against Morphic-ar.405 ===============
Item was changed: ----- Method: DockingBarMorph>>handleListenEvent: (in category 'events-processing') ----- handleListenEvent: anEvent " I am registered as a keyboardListener of the ActiveHand, watching for ctrl-<n> keystrokes, and upon them if I have an nth menu item, I'll activate myself and select it. " (anEvent controlKeyPressed and: [ anEvent keyValue + between: 48 " $0 asciiValue " - between: 49 " $1 asciiValue " and: 57 " $9 asciiValue " ]) ifTrue: [ | index itemToSelect | index := anEvent keyValue - 48. itemToSelect := (submorphs select: [ :each | + each isKindOf: DockingBarItemMorph ]) + at: index + ifAbsent: [ + ^self searchBarMorph ifNotNil: [ :searchBar | + searchBar activate: anEvent ] ]. - each isKindOf: DockingBarItemMorph ]) at: index ifAbsent: [ ^self ]. self activate: anEvent. self selectItem: itemToSelect event: anEvent ]!
Item was added: + ----- Method: DockingBarMorph>>searchBarMorph (in category 'events-processing') ----- + searchBarMorph + + ^self submorphs detect: [ :each | each class = SearchBarMorph ] ifNone: [ nil ]!
Item was added: + ----- Method: SearchBarMorph>>activate: (in category 'search') ----- + activate: event + + event hand newKeyboardFocus: self. + self selectAll!