Christoph Thiede uploaded a new version of Tools to project The Inbox:
http://source.squeak.org/inbox/Tools-ct.939.mcz==================== Summary ====================
Name: Tools-ct.939
Author: ct
Time: 13 February 2020, 12:23:29.559118 am
UUID: c2c6c61e-6f20-2443-9075-3fcb6040d390
Ancestors: Tools-ct.932
Refines debugger's category dialog again, combining it with the benefits of #defaultCategoryForSelector:. Depends on Tools-ct.932 and Kernel-ct.1285.
=============== Diff against Tools-ct.932 ===============
Item was changed:
----- Method: Debugger>>askForCategoryIn:default:ifCancel: (in category 'notifier support') -----
askForCategoryIn: aClass default: defaultCategory ifCancel: aBlock
| categories category |
categories := (aClass allMethodCategoriesIntegratedThrough: Object) asOrderedCollection.
categories
remove: defaultCategory ifAbsent: [];
+ addFirst: defaultCategory;
+ remove: ClassOrganizer default ifAbsent: [];
+ addFirst: ClassOrganizer default.
- addFirst: defaultCategory.
category := Project uiManager
chooseFromOrAddTo: categories
lines: #(2)
title: 'Please provide a good category for the new method' translated.
category ifNil: [^ aBlock value].
^ category ifEmpty: [defaultCategory]!
Item was changed:
----- Method: Debugger>>implementMissingMethod:inClass:ifCancel: (in category 'notifier support') -----
implementMissingMethod: aMessage inClass: aClass ifCancel: aBlock
| category |
category := self
askForCategoryIn: aClass
+ default: (aClass defaultCategoryForSelector: aMessage selector)
- default: ClassOrganizer default
ifCancel: [^ aBlock value].
^ self
implementMissingMethod: aMessage
inClass: aClass
inCategory: category!