Marcel Taeumel uploaded a new version of ToolBuilder-Kernel to project The Trunk:
http://source.squeak.org/trunk/ToolBuilder-Kernel-mt.103.mcz==================== Summary ====================
Name: ToolBuilder-Kernel-mt.103
Author: mt
Time: 10 August 2016, 2:59:16.914966 pm
UUID: 01eda693-24b8-a14c-a4c4-d73a2b03be3b
Ancestors: ToolBuilder-Kernel-mt.102
If "filterable lists" is disabled, there has to be a way to force it, for example, for our ListChooser. Otherwise the ListChoose would behave strangely.
=============== Diff against ToolBuilder-Kernel-mt.102 ===============
Item was changed:
PluggableWidgetSpec subclass: #PluggableListSpec
+ instanceVariableNames: 'list getIndex setIndex getSelected setSelected menu keyPress autoDeselect dragItem dropItem dropAccept doubleClick listSize listItem keystrokePreview icon vScrollBarPolicy hScrollBarPolicy dragStarted helpItem filterableList'
- instanceVariableNames: 'list getIndex setIndex getSelected setSelected menu keyPress autoDeselect dragItem dropItem dropAccept doubleClick listSize listItem keystrokePreview icon vScrollBarPolicy hScrollBarPolicy dragStarted helpItem'
classVariableNames: ''
poolDictionaries: ''
category: 'ToolBuilder-Kernel'!
!PluggableListSpec commentStamp: 'ar 7/15/2005 11:54' prior: 0!
A single selection list element.
Instance variables:
list <Symbol> The selector to retrieve the list elements.
getIndex <Symbol> The selector to retrieve the list selection index.
setIndex <Symbol> The selector to set the list selection index.
getSelected <Symbol> The selector to retrieve the list selection.
setSelected <Symbol> The selector to set the list selection.
menu <Symbol> The selector to offer (to retrieve?) the context menu.
keyPress <Symbol> The selector to invoke for handling keyboard shortcuts.
autoDeselect <Boolean> Whether the list should allow automatic deselection or not.
dragItem <Symbol> Selector to initiate a drag action on an item
dropItem <Symbol> Selector to initiate a drop action of an item
dropAccept <Symbol> Selector to determine whether a drop would be accepted!
Item was added:
+ ----- Method: PluggableListSpec>>filterableList (in category 'accessing - list') -----
+ filterableList
+ ^ filterableList!
Item was added:
+ ----- Method: PluggableListSpec>>filterableList: (in category 'accessing - list') -----
+ filterableList: aBoolean
+ filterableList := aBoolean.!