The Trunk: System-mt.1119.mcz

Marcel Taeumel uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-mt.1119.mcz

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

Name: System-mt.1119
Author: mt
Time: 15 November 2019, 2:31:30.94533 pm
UUID: bd66f2d9-be6a-9744-840d-9654e2d5565d
Ancestors: System-dtl.1118, System-ct.1097

Merges System-ct.1097, which adds means to open tools for class (or system categories), method versions, and packages.

=============== Diff against System-dtl.1118 ===============

Item was added:
+ ----- Method: ToolSet class>>browseCategory: (in category 'browsing') -----
+ browseCategory: aCategory
+
+ self default ifNil: [^ self inform: 'Cannot open Browser'].
+ ^ self default browseCategory: aCategory!

Item was added:
+ ----- Method: ToolSet class>>browseMethod: (in category 'browsing') -----
+ browseMethod: aCompiledMethod
+ "For convenience: Either open a code browser or a version browser for the given method."
+
+ ^ aCompiledMethod isInstalled
+ ifTrue: [self browse: aCompiledMethod methodClass selector: aCompiledMethod selector]
+ ifFalse: [self browseMethodVersion: aCompiledMethod]!

Item was added:
+ ----- Method: ToolSet class>>browseMethodVersion: (in category 'browsing') -----
+ browseMethodVersion: aCompiledMethod
+
+ self default ifNil:[^self inform: 'Cannot open Browser'].
+ ^self default browseMethodVersion: aCompiledMethod!

Item was added:
+ ----- Method: ToolSet class>>browsePackage: (in category 'browsing') -----
+ browsePackage: aPackageInfo
+
+ self default ifNil: [^ self inform: 'Cannot open Browser'].
+ ^ self default browsePackage: aPackageInfo!