Select Code to Download

$dynatab_name = 'SNG';
dynatab_frame_child($tab_Tabbed, \$tabbed_frame{$dynatab_name}, $dynat
+ab_caption, $dynatab_title, $dynatab_image, $dynatab_colour , $dynata
+b_raised_colour);

sub     dynatab_frame_child($$$$$$$) {
my ($tab_parent, $ref_child, $dynatab_caption, $dynatab_title, $dynata
+b_image, $dynatab_colour ,$dynatab_raised_colour) = @_;
...
            ->pack()
            ;
}

sub hide_tab() {

...
    $tabbed_frame{$dynatab_name}->configure(-hidden => 1);
}
}

[hide_tab] hiding SNG -  <>
Tk::Error: Can't set -hidden to `1' for Tk::Frame=HASH(0x20f90157e48):
+ unknown option "-hidden" at C:.....