[squeak-dev] The Trunk: Tools-mt.895.mcz

Tobias Pape Das.Linux at gmx.de
Thu Sep 26 15:37:46 UTC 2019


> On 26.09.2019, at 17:31, commits at source.squeak.org wrote:
> 
> Marcel Taeumel uploaded a new version of Tools to project The Trunk:
> http://source.squeak.org/trunk/Tools-mt.895.mcz
> 
> ==================== Summary ====================
> 
> Name: Tools-mt.895
> Author: mt
> Time: 26 September 2019, 5:31:06.240419 pm
> UUID: 8a9fb174-09f8-894c-8c5f-35a10699d7ec
> Ancestors: Tools-mt.894
> 
> In debuggers, use same kind of "add protocol" as in code browsers.
> 
> =============== Diff against Tools-mt.894 ===============
> 
> Item was changed:
>  ----- Method: Debugger>>askForCategoryIn:default: (in category 'notifier support') -----
>  askForCategoryIn: aClass default: aString
> + 
> + 	^ (Project uiManager
> + 		chooseFromOrAddTo: (aClass allMethodCategoriesIntegratedThrough: Object)
> + 		lines: #()
> + 		title: 'Please provide a good category for the new method' translated)
> + 			ifNil: [aString]
> + 			ifNotNil: [:newCategory | newCategory ifEmpty: [aString]]!
> - 	| categories index category |
> - 	categories := OrderedCollection with: 'new ...'. 
> - 	categories addAll: (aClass allMethodCategoriesIntegratedThrough: Object).	
> - 	index := UIManager default  
> - 				chooseFrom: categories
> - 				title: 'Please provide a good category for the new method!!' translated.
> - 	index = 0 ifTrue: [^ aString].
> - 	category := index = 1 ifTrue: [UIManager default request: 'Enter category name:']
> - 						ifFalse: [categories at: index].
> - 	^ category isEmpty ifTrue: [^ aString] ifFalse: [category]!
> 

Aside: What is the preferred version to reach the ui manager? `UIManager default` or `Project uiManager` (I wasn't aware of the latter, btw.)

Best regards
	-Tobias

> 




More information about the Squeak-dev mailing list