|
|
I think the ReferenceView class should publish it's most important
attribute #resourceIdentifier. Enclosed the code which does this.
Maybe Andy Bower will incorporate this in to the next release.
ReferenceView>>publishedAspectsOfInstances
"Answer a Set of AspectDescriptors that describe the aspects published
by instances of the receiver"
| aspects |
aspects := super publishedAspectsOfInstances.
aspects
removeKey: #hasBorder;
removeKey: #hasClientEdge;
removeKey: #hasStaticEdge;
removeKey: #usePreferredExtent;
removeKey: #contextMenu;
removeKey: #preferredExtent;
removeKey: #font;
removeKey: #isTransparent;
removeKey: #isEnabled;
removeKey: #text;
add: (Aspect string: #resourceIdentifier).
^aspects.
Regards
Carsten Haerle
straightec GmbH
|
Locked
