RE: [tcltk-perl] Menu changes ??
Brought to you by:
hobbs
From: Jeff H. <je...@Ac...> - 2004-04-20 19:36:42
|
> > > I see you are working on menus ... the AUTOLOAD problem you > > I was not working on menus, I just tried to move menu to its > own package. I found the issue. In the change from special_widget_abilities to the create_method_in_widget_package, you changed the command from something like: checkbutton => sub { $int->call("$$mnu",'add','checkbutton',@_); }, to checkbutton => sub { my $wid = shift; my $int = $wint{$$wid}; $int->call("$$mnu",'add','checkbutton',@_); }, but the change in $mnu context requires this instead: checkbutton => sub { my $wid = shift; my $int = $wint{$$wid}; $int->call($wid->path,'add','checkbutton',@_); }, That correction has the menus working as before. So we have to just watch for this in related shifts. Jeff |