The Trunk: ToolBuilder-Morphic-ar.55.mcz

Andreas Raab uploaded a new version of ToolBuilder-Morphic to project The Trunk:
http://source.squeak.org/trunk/ToolBuilder-Morphic-ar.55.mcz

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

Name: ToolBuilder-Morphic-ar.55
Author: ar
Time: 3 April 2010, 11:21:21.321 am
UUID: f457e745-c735-5540-a739-8b91f540b075
Ancestors: ToolBuilder-Morphic-MAD.54, ToolBuilder-Morphic-fbs.54

Merging ToolBuilder-Morphic-fbs.54:

This addresses sq 7486: a ListChooser now handles up/down arrows (so you can use a mouse's scrollwheel) while still passing other keyboard events to the search morph.

=============== Diff against ToolBuilder-Morphic-MAD.54 ===============

Item was changed:
  ----- Method: ListChooser>>keyStrokeFromList: (in category 'event handling') -----
  keyStrokeFromList: event
+ "we don't want the list to be picking up events, excepting scroll events"
+
+ "Don't sent ctrl-up/ctrl-down events to the searchMorph: they're scrolling events."
+ (#(30 31) contains: [:each | each = event keyValue]) not
+ ifTrue:
+ ["window world primaryHand keyboardFocus: searchMorph."
+ searchMorph keyStroke: event.
+ "let the list know we've dealt with it"
+ ^true].
+ ^false.
+ !
- "we don't want the list to be picking up events"
- window world primaryHand keyboardFocus: searchMorph.
- searchMorph keyStroke: event.
- "let the list know we've dealt with it"
- ^ true!