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

commits at source.squeak.org commits at source.squeak.org
Wed Aug 3 07:26:32 UTC 2011

A new version of Tools was added to project The Inbox:

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

Name: Tools-fbs.372
Author: fbs
Time: 3 August 2011, 8:26:08.804 am
UUID: cda1854b-3aff-43e6-b3a3-bd88c3b9e5de
Ancestors: Tools-bf.371

When you rename a system category, you should have the newly-named system category selected after the rename.

=============== Diff against Tools-bf.371 ===============

Item was changed:
  ----- Method: Browser>>renameSystemCategory (in category 'system category functions') -----
  	"Prompt for a new category name and add it before the
  	current selection, or at the end if no current selection"
  	| oldSelection newName |
  	oldSelection := self selectedSystemCategory.
  	oldSelection isNil
  		ifTrue: [^ self].  "no selection"
  	self okToChange ifFalse: [^ self].
  	newName := self
  		request: 'Please type new category name'
  		initialAnswer: oldSelection.
  	newName isEmpty
  		ifTrue: [^ self]
  		ifFalse: [newName := newName asSymbol].
  	oldSelection = newName ifTrue: [^ self].
  		renameCategory: oldSelection
  		toBe: newName.
+ 	self selectSystemCategory: newName.
- 	self selectSystemCategory: oldSelection.
  	self changed: #systemCategoryList.!

More information about the Squeak-dev mailing list