[Pkg] The Trunk: ToolBuilder-Morphic-mt.165.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Jun 1 14:43:23 UTC 2016

Marcel Taeumel uploaded a new version of ToolBuilder-Morphic to project The Trunk:

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

Name: ToolBuilder-Morphic-mt.165
Author: mt
Time: 1 June 2016, 4:43:17.541666 pm
UUID: eb5a9bb7-d38f-c84d-bf97-5643786996e8
Ancestors: ToolBuilder-Morphic-cmm.164

Our list choosers use system windows. Request input for specific data. Use that to update the current keyboard focus. See #update:with: in pluggable list and text morphs.

=============== Diff against ToolBuilder-Morphic-cmm.164 ===============

Item was changed:
  ----- Method: ListChooser>>chooseItemFrom:title:addAllowed: (in category 'initialize-release') -----
  chooseItemFrom: labelList title: aString addAllowed: aBoolean
  	fullList := labelList asOrderedCollection. "coerce everything into an OC"
  	builder := ToolBuilder default.
  	self list: fullList.
  	self title: aString.
  	addAllowed := aBoolean.
  	window := ToolBuilder default open: self.
  	window center: Sensor cursorPoint.
  	window setConstrainedPosition: (Sensor cursorPoint - (window fullBounds extent // 2)) hangOut: false.
+ 	self changed: #inputRequested with: #searchText.
+ 	window lookFocused. "Sigh..."
  	builder runModal: window.
  	^ result!

Item was changed:
  ----- Method: ListMultipleChooser>>choose (in category 'actions') -----
  	| builder window |
  	builder := ToolBuilder default.
  	window := builder open: self..
  	window center: Sensor cursorPoint. "Avoid morphic dependency here..."
+ 	self changed: #inputRequested with: #selectedIndex.
+ 	window lookFocused. "Sigh..."	
  	builder runModal: window.
  	^ self selectedValues!

More information about the Packages mailing list