[squeak-dev] The Trunk: Morphic-ul.406.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Mar 31 00:54:32 UTC 2010


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!




More information about the Squeak-dev mailing list