Andreas Raab uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-ar.163.mcz==================== Summary ====================
Name: Tools-ar.163
Author: ar
Time: 19 January 2010, 8:42:45.627 pm
UUID: a39edac9-3a88-4d45-a137-62ce7235cf43
Ancestors: Tools-ar.162
Fix setting the editString in Browser opening.
=============== Diff against Tools-ar.162 ===============
Item was changed:
----- Method: Browser>>openMessageCatEditString: (in category 'initialize-release') -----
openMessageCatEditString: aString
"Create a pluggable version of the views for a Browser that just shows one message category."
"Example:
Preferences browseThemes.
"
| builder max |
+ aString ifNotNil:[
+ "Note: The views aren't actually built yet after we've called buildWindowWith:.
+ Since we can't send changed: #editString before the views have been built
+ we just shoot the #changed: message into the #future. This is the easiest
+ way to solve this issue locally."
+ self future changed: #editString with: aString].
builder := ToolBuilder default.
max := self wantsOptionalButtons ifTrue:[0.32] ifFalse:[0.4].
^self buildWindowWith: builder specs: {
(0@0 corner: 1.0@0.08) -> [self buildMessageListCatSingletonWith: builder].
(0.0@0.08 corner: 1.0@max) -> [self buildMessageListWith: builder].
(0@max corner: 1@1) -> [self buildCodePaneWith: builder].
}.!