Master/tlpkg/tlperl.straw/lib/Tk/NBFrame.pm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

package Tk::NBFrame;

use vars qw($VERSION);
$VERSION = '4.004'; # $Id: //depot/Tkutf8/NBFrame/NBFrame.pm#4 $

use Tk qw($XS_VERSION);

use base  qw(Tk::Widget);

Construct Tk::Widget 'NBFrame';

bootstrap Tk::NBFrame;

sub Tk_cmd { \&Tk::nbframe }

Tk::Methods qw(activate add delete focus info geometryinfo identify
               move pagecget pageconfigure);

1;