> 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