Chris Muller uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-cmm.409.mcz

==================== Summary ====================

Name: Morphic-cmm.409
Author: cmm
Time: 4 April 2010, 7:38:12.513 pm
UUID: fccf6217-a81a-4ebc-94be-ec0e36a05b7a
Ancestors: Morphic-ar.408

Changed hot-key for search-bar activation to Control+7 instead of Control+7, 8, or 9.  Control+9 was already taken for a very useful, legacy function (surround with parenthesis).  This is also consistent with the other hot-keys on the DockingBar since the search-bar is the 7th item over, not the 9th.  There are a limited number of shortcut keys still available on the keyboard, so no function deserves three separate hot-keys.

=============== Diff against Morphic-ar.408 ===============

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 " 
+ 			and: 55 " $7 asciiValue " ]) ifTrue: [ 
- 			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 ] ].
  		self activate: anEvent.
  		self 
  			selectItem: itemToSelect
  			event: anEvent ]!