Did you press Ctrl+Shift+Space?
This should open/close the Watcher.
Cheers,
Doru
On 23 May 2012, at 17:21, Ben Coman wrote:
Tudor Girba wrote:
Hi,
I enhanced Glamour with a first version of a Watcher browser that offers a behavior
similar to Quick Preview on Mac.
For example, if you run the code below in a Moose image, and then press Ctrl+Shift+Space
you will get a preview of source code in a window floating above the current one. See the
attachment.
| browser |
browser := GLMTabulator new.
browser column: #methods.
browser transmit to: #methods; andShow: [:a | a list display: #methods; format: #selector
].
browser transmit from: #methods; toWatcher; andShow: [:a | a smalltalkCode
smalltalkClass: [ :method | method methodClass ];
display: [:method | method getSource ] ].
browser openOn: GLMBrowser
To get it 100% useable I would need help with some Morphic magic:
- to make the Watcher window not appear in the taskbar
- to make the rendering of Watcher happen in another thread so that it does not block the
current UI
Cheers,
Doru
This does not work for me out of the box with a fresh Moose 4.7 downloaded this evening.
There is no response when clicking on the method list.
I see in GLMMorphicWatcherRender>>actOnMatchingPresentationsChanged that you use
you have [ GLMWatcherWindow uniqueInstance ] and a stab in the dark is that something
broke since your uniqueInstance was created. I wonder your example still works for you
after [ GLMWatcherWindow reset ].
In any case, I got it partially working with the following (likely inappropriate)
hack...
GLMMorphicWatcherRenderer>>actOnMatchingPresentationsChanged: anAnnouncement
"whenever a relevant pane changes its presentations,
we override the contents from the GLMWatcherWindow"
| window |
window := GLMWatcherWindow uniqueInstance.
window contentsMorph
removeAllMorphs;
addMorph: (self renderObject: anAnnouncement pane)
fullFrame: (LayoutFrame fractions: (0@0 corner: 1@1)) .
window openInWorld.
Clicking in turn on several methods shows each in the single Glamorous Watcher. However
Glamorous Watcher keeps repositioning on top of the Glamorous Browser.
cheers -ben
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev
--
www.tudorgirba.com
"Every successful trip needs a suitable vehicle."