This is the mail archive of the
insight@sources.redhat.com
mailing list for the Insight project.
Re: [RFA] balloon.tcl
- From: "Martin M. Hunt" <hunt at redhat dot com>
- To: Keith Seitz <keiths at redhat dot com>
- Cc: Insight Mailing List <insight at sources dot redhat dot com>
- Date: Thu, 7 Mar 2002 12:26:12 -0800
- Subject: Re: [RFA] balloon.tcl
- Organization: Red Hat Inc
- References: <Pine.GSO.4.33.0203071209190.5360-100000@makita.cygnus.com>
Checked in.
On Thursday 07 March 2002 12:11 pm, Keith Seitz wrote:
> On Thu, 7 Mar 2002, Martin M. Hunt wrote:
> > I want balloon help to work like this:
> >
> > balloon register $twin ""
> > balloon variable $twin [scope help]
> > balloon notify [code $this foo] $twin
> >
> > Then in your private method "foo", you just set $help to whatever you
> > want and it appears in the balloon window. Sounds OK?
>
> Approved. Upvar makes me nervous, though. I wish there was a way we could
> just to a function callback, but that would be a much larger change. For
> now, let's see how this works.
>
> Thanks, Martin.
> Keith
>
> > 2002-03-07 Martin M. Hunt <hunt@redhat.com>
> >
> > * library/balloon.tcl (_set_variable): Set the public
> > variable before calling notifiers. Set the help text
> > from the public variable afterwards.
> > (BALLOON_command_variable): Fix call with no args to
> > return variable name.