The Trunk: Services-Base-cmfcmf.69.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Services-Base-cmfcmf.69.mcz

commits-2
Marcel Taeumel uploaded a new version of Services-Base to project The Trunk:
http://source.squeak.org/trunk/Services-Base-cmfcmf.69.mcz

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

Name: Services-Base-cmfcmf.69
Author: cmfcmf
Time: 30 October 2020, 3:19:26.82353 pm
UUID: 8f518c2e-77bb-cc40-a4ff-524c896eabc6
Ancestors: Services-Base-jr.68

Indicate instance messages when instance-side reference is browsed.

Otherwise the browser may reach an invalid state, where the class button is still selected, even though an instance message is browsed:

b := Browser open.
b browseReference: (Color >> #asColor) asCodeReference.
b browseReference: (Color class >> #green) asCodeReference.
b browseReference: (Color >> #asColor) asCodeReference.

=============== Diff against Services-Base-jr.68 ===============

Item was changed:
  ----- Method: Browser>>browseReference: (in category '*services-base') -----
  browseReference: ref
+
  self okToChange ifTrue: [
  self selectCategoryForClass: ref actualClass theNonMetaClass.
  self selectClass: ref actualClass theNonMetaClass .
+ ref actualClass isMeta ifTrue: [self indicateClassMessages] ifFalse: [self indicateInstanceMessages].
- ref actualClass isMeta ifTrue: [self indicateClassMessages].
  self changed: #classSelectionChanged.
  self selectMessageCategoryNamed: ref category.
  self selectedMessageName: ref methodSymbol.
  ]!