[squeak-dev] The Inbox: Tools-fbs.234.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Apr 23 08:35:01 UTC 2010


A new version of Tools was added to project The Inbox:
http://source.squeak.org/inbox/Tools-fbs.234.mcz

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

Name: Tools-fbs.234
Author: fbs
Time: 23 April 2010, 10:33:38.711 am
UUID: 2e63bccb-791d-b94a-903d-7e9aeb4db33a
Ancestors: Tools-ar.233

M7511: MessageNames uses Browser's better-named Frame creation methods.

=============== Diff against Tools-ar.233 ===============

Item was changed:
  ----- Method: MessageNames>>buildWith: (in category 'toolbuilder') -----
  buildWith: builder
  	"ToolBuilder open: MessageNames new"
+ 	| searchPaneHeight windowSpec max result |
+ 	searchPaneHeight := self buttonHeight.
- 	| windowSpec max result |
  	max := self wantsOptionalButtons ifTrue:[0.42] ifFalse:[0.5].
  	windowSpec := self buildWindowWith: builder specs: {
+ 		(self topConstantHeightFrame: searchPaneHeight fromLeft: 0 width: 0.5) -> [self buildSearchPaneWith: builder].
+ 		(self selectorListFrame: max fromTop: searchPaneHeight) -> [self buildSelectorListWith: builder].
- 		(self searchPaneFrame: self buttonHeight) -> [self buildSearchPaneWith: builder].
- 		(self selectorListFrame: max fromTop: self buttonHeight) -> [self buildSelectorListWith: builder].
  		(0.5 at 0.0 corner: 1.0 at max) -> [self buildMessageListWith: builder].
  		(0 at max corner: 1 at 1) -> [self buildCodePaneWith: builder].
  	}.
  
  	result := builder build: windowSpec.
  	searchPane := builder widgetAt: #search.
  	^result!

Item was removed:
- ----- Method: MessageNames>>searchPaneFrame: (in category 'toolbuilder') -----
- searchPaneFrame: height
- 	^LayoutFrame new
- 		leftFraction: 0 offset: 0;
- 		topFraction: 0 offset: 0;
- 		rightFraction: 0.5 offset: 0;
- 		bottomFraction: 0 offset: height.!




More information about the Squeak-dev mailing list