> You want to test if a widget is packed ?
> Then, you can use the ismapped method.
> It returns 1 (is packed) or 0 (is not packed).

hm, this doesn't work:

$gobutton=$top->Button(-text => "Go!", -command => [\&Compute]);
        if (($gobutton->ismapped)==0) {
                $gobutton->pack;
        }

I can generate several Buttons...

Lars
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to