From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 8919 invoked by alias); 7 Mar 2002 20:26:48 -0000 Mailing-List: contact insight-help@sources.redhat.com; run by ezmlm Precedence: bulk List-Subscribe: List-Archive: List-Post: List-Help: , Sender: insight-owner@sources.redhat.com Received: (qmail 8871 invoked from network); 7 Mar 2002 20:26:47 -0000 Received: from unknown (HELO localhost.localdomain) (12.230.181.242) by sources.redhat.com with SMTP; 7 Mar 2002 20:26:47 -0000 Received: from there (DRAGON [127.0.0.1]) by localhost.localdomain (8.11.6/8.11.6) with SMTP id g27KQCc02151; Thu, 7 Mar 2002 12:26:12 -0800 Message-Id: <200203072026.g27KQCc02151@localhost.localdomain> Content-Type: text/plain; charset="iso-8859-1" From: "Martin M. Hunt" Organization: Red Hat Inc To: Keith Seitz Subject: Re: [RFA] balloon.tcl Date: Thu, 07 Mar 2002 12:26:00 -0000 X-Mailer: KMail [version 1.3.2] Cc: Insight Mailing List References: In-Reply-To: MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-SW-Source: 2002-q1/txt/msg00196.txt.bz2 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 > > > > * 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.