[Moose-dev] Re: Issue 361 in moose-technology: Glamour status bar should take into account Mondrian window status

Comment #2 on issue 361 by alexandr...@gmail.com: Glamour status bar should take into account Mondrian window status http://code.google.com/p/moose-technology/issues/detail?id=361

For example:

| view statusBar |

view := ROMondrianViewBuilder new.

statusBar := ROElement new + ROLabel + ROBox white. view stack add: statusBar. statusBar translateTo: 0 @ 480.

view interaction on: ROMouseEnter do: [ :event | statusBar model: event element model. ]. view shape rectangle size: 10. view nodes: (Collection withAllSubclasses). view edgesFrom: #superclass. view treeLayout.

view open