[Moose-dev] Re: minimap in Glamour-Roassal

For people wondering what the minimap is all about, consider the following script: | view eltos | view := ROView new. view @ RODraggable. view on: ROMouseRightClick do: [ :event | ROZoomInMove new on: view ]. view on: ROMouseLeftClick do: [ :event | ROZoomOutMove new on: view ]. eltos := ROElement spritesOn: (1 to: 400). eltos do: [:el | el + ROLabel ]. view addAll: eltos. ROGridLayout new on: eltos. "Mini map opens by pressing m" view @ ROMiniMap. view open. Pressing the "m" key open a navigation map which gives something like: <Screen Shot 2013-03-12 at 10.28.28 PM.png> Cheers, Vanessa and Alexandre On Mar 12, 2013, at 5:51 AM, Usman Bhatti <usman.bhatti(a)gmail.com&gt; wrote: > > > > On Tue, Mar 12, 2013 at 10:30 AM, Tudor Girba <tudor(a)tudorgirba.com&gt; wrote: > I do not understand the issue, but that is probably because I did not yet see the mini map. How does it work? > > Roassal allows minimaps for large visualizations, see this example in Roassal: ROMondrianExample >>miniMap. > So the idea is that any visualization allowing minimap, a minimap popups when one presses 'm'. > However, when roassal visu is embedded in a glamour browser, it doesn't work. Here's a shorter example of a browser that shows the visu of the example in a browser but there's no miniMap when 'm' is pressed. > > | browser | > browser := GLMTabulator new. > browser column: #list; column: #drawing. > > browser transmit > to: #list; > andShow: [ :a | a list ]. > browser transmit > to: #drawing; > andShow: [ :a | a roassal painting: > [ :moview :collection | > ROMondrianExample new miniMapOn: moview. > ] ]. > browser openOn: #(1 2 3 4 5 6). > > > > > Doru > > > On Tue, Mar 12, 2013 at 10:12 AM, Usman Bhatti <usman.bhatti(a)gmail.com&gt; wrote: > Hello, > > I am trying to create a roassal minimap in a glamour browser. But I do not get a minimap when pressing m key. > It might be something to do with how keystrokes are interpreted in Glamour. can you have a look? > > Here's a simple browser with a roassal visualization (adapted from one of ben's mail on moose-dev). > > | browser viewHack | > browser := GLMTabulator new. > browser column: #list; column: #drawing. > > browser transmit > to: #list; > andShow: [ :a | a list ]. > browser transmit > to: #drawing; > andShow: [ :a | a roassal painting: > [ :moview :collection | > moview raw @ (ROMiniMap new targetView: moview stack). > collection do: [ :x | moview view add: (ROElement spriteOn: x) + ROLabel + ROBox white ]. > ROVerticalLineLayout on: moview view elements. > > viewHack := moview view. > ] ]. > browser transmit > from: #list port:#selection; > to: #drawing; > transformed: > [ :x | | foundElements | > viewHack elements do: [ :el | ROUnhighlightElement on: el ]. > targetElement := viewHack elements at: x. > ROFocusView on: targetElement. > ROHighlightElement on: targetElement color: Color red. > viewHack signalUpdate > ]. > browser openOn: #(1 2 3 4 5 6). > > _______________________________________________ > Moose-dev mailing list > Moose-dev(a)iam.unibe.ch > https://www.iam.unibe.ch/mailman/listinfo/moose-dev > > > > > -- > www.tudorgirba.com > > "Every thing has its own flow" > > _______________________________________________ > Moose-dev mailing list > Moose-dev(a)iam.unibe.ch > https://www.iam.unibe.ch/mailman/listinfo/moose-dev > > > _______________________________________________ > Moose-dev mailing list > Moose-dev(a)iam.unibe.ch > https://www.iam.unibe.ch/mailman/listinfo/moose-dev -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. _______________________________________________ Moose-dev mailing list Moose-dev(a)iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev