I think that having a way to interpret meta graph would be the way to go. Right now, a meta graph can be interpreted using one single strategy.
As far as I remember, my fix goes in this direction.
Cheers, Alexandre
On 27 Jun 2007, at 14:04, Cédrick Béler wrote:
- In the system browser, I'd like to display all methods when
selecting a class - Alexandre Bergel posted a cs for that but I can't find it anymore and I can't do it by myself too. Does someone have this change set or can you tell me where to look at... What is the "action" done when selecting a class (probably an announcment related update...) ?
Everybody want this, but Colin hasn't found a good way of doing it.
ahh... I fell less stupid then ;)
I ended up looking at OBColumn and OBColumnPanel OBColumn subscribes to 5 OBAnnoucments especially OBSelectionChanged or OBSelectingNode... Anyway, I'll see later...
- also when displaying all methods, I'd like to color each list
item according to a category color. Is it feasible ? Can you point me where to look at ?
I think you should change what OBMethodNode>>label returns or something like this. I guess you can return a Text with colors.
Thanks, I'll have a look
Oh and last request, when OB is enabled by default, hitting the browse shortcut on a class name (in a worspace for instace) doens't work for me. The browser is opening with nothing selected. This is calling the following code wich reproduces for me the same problem (opens a browser with no class selected): OTToolset browse: WAComponent selector: nil. Is it normal (maybe I don't have the last version) because browsing a class (alt+b) inside OB works... ?
I solved this by adding a test in the following method:
OBSystemBrowserAdaptor>>fullOnClass: aClass selector: aSelector aSelector ifNil: [ ^ OBSystemBrowser openOnClass: aClass]. ^ OBSystemBrowser openOnClass: aClass selector: aSelector
Last, I couldn't open a browser from the inspector/explorer (same pb - empty browser) I changed (I think here it's more a problem with the ToolSet integration):
StringHolder>>browseMethodFull "Create and schedule a full Browser and then select the current class and message."
| myClass | (myClass := self selectedClassOrMetaClass) ifNotNil: [ToolSet browse: myClass selector: self selectedMessageName.] "instead of .... Browser fullOnClass: myClass selector: self selectedMessageName "