11 package Tk;
     12 require 5.007;
     13 use lib './Tk/Event'; #LINE I ADDED
     14 use     Tk::Event; 
     15 use     AutoLoader qw(AUTOLOAD);
     16 use     DynaLoader;
     17 use     Cwd();
     18 use base qw(Exporter DynaLoader);
     19 use     File::Spec qw();