Commit | Line | Data |
---|---|---|
86530b38 AT |
1 | package Tk::Xlib; |
2 | require DynaLoader; | |
3 | ||
4 | use vars qw($VERSION); | |
5 | $VERSION = '3.010'; # $Id: //depot/Tk8/Xlib/Xlib.pm#10 $ | |
6 | ||
7 | use Tk qw($XS_VERSION); | |
8 | use Exporter; | |
9 | ||
10 | use base qw(DynaLoader Exporter); | |
11 | @EXPORT_OK = qw(XDrawString XLoadFont XDrawRectangle); | |
12 | ||
13 | bootstrap Tk::Xlib; | |
14 | ||
15 | 1; |