[OpenSPARC-T2-DV] / tools / perl-5.8.0 / lib / site_perl / 5.8.0 / sun4-solaris / Tk / Event.pm

package Tk::Event;
use vars qw($VERSION $XS_VERSION @EXPORT_OK);
END { CleanupGlue() }
$VERSION = '3.024'; # $Id: //depot/Tk8/Event/Event.pm#24 $
$XS_VERSION = '800.023';
require DynaLoader;
use base  qw(Exporter DynaLoader);
@EXPORT_OK = qw($XS_VERSION DONT_WAIT WINDOW_EVENTS  FILE_EVENTS
                TIMER_EVENTS IDLE_EVENTS ALL_EVENTS);
bootstrap Tk::Event;
require   Tk::Event::IO;
1;
__END__
Commit	Line	Data
86530b38 AT	1	package Tk::Event;
	2	use vars qw($VERSION $XS_VERSION @EXPORT_OK);
	3	END { CleanupGlue() }
	4	$VERSION = '3.024'; # $Id: //depot/Tk8/Event/Event.pm#24 $
	5	$XS_VERSION = '800.023';
	6	require DynaLoader;
	7	use base qw(Exporter DynaLoader);
	8	@EXPORT_OK = qw($XS_VERSION DONT_WAIT WINDOW_EVENTS FILE_EVENTS
	9	TIMER_EVENTS IDLE_EVENTS ALL_EVENTS);
	10	bootstrap Tk::Event;
	11	require Tk::Event::IO;
	12	1;
	13	__END__