summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/Tk/Labelframe.pm
blob: dc167fe161d97691abd72383d7fa838f6c90cd43 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
package Tk::Labelframe;
use strict;

use vars qw($VERSION);
$VERSION = '4.003'; # sprintf '4.%03d', q$Revision: #2 $ =~ /#(\d+)/;

# New widget which is a kind of Frame with a label ...

use base qw(Tk::Frame);

Construct Tk::Widget 'Labelframe';

sub Tk_cmd { \&Tk::labelframe }

1;
__END__