perl-Tk-nolibpt.patch

   1 diff -durN Tk800.022.orig/Makefile.PL Tk800.022/Makefile.PL
   2 --- Tk800.022.orig/Makefile.PL  Sat Apr 29 11:28:28 2000
   3 +++ Tk800.022/Makefile.PL       Sun Mar 18 14:23:48 2001
   4 @@ -31,7 +31,7 @@
   5  else
   6   {
   7    my $plibs = $Config{'libs'};
   8 -  my $libs  = "$xlib -lX11 -lpt";
   9 +  my $libs  = "$xlib -lX11";
  10    my @try   = qw(-lsocket -lnsl -lm);
  11    push(@try,'-lc') if $^O =~ /svr4/i;
  12    my $lib;