# at the top of the program, after loading Tk::Notebook

sub Tk::NoteBook::InitTabSize {
  my $nb = shift;
  $nb->{'pad-x1'} = 0;
  $nb->{'pad-x2'} = 0;
  $nb->{'pad-y1'} = 0;
  $nb->{'pad-y2'} = 0;
  $nb->{'minW'} = 0;
  $nb->{'minH'} = 0;
}