--- libnet-1.0505.orig/Makefile.PL Wed May 28 01:48:36 1997
+++ libnet-1.0505/Makefile.PL Mon Oct 13 08:43:38 1997
@@ -5,7 +5,7 @@
$NAME = 'Net';
$DISTNAME = "libnet";
-$VERSION = "1.0505";
+$VERSION = "1.0506";
BEGIN { require 5.002 }
--- libnet-1.0505.orig/Configure Thu Apr 3 09:16:13 1997
+++ libnet-1.0505/Configure Mon Oct 13 08:42:12 1997
@@ -499,22 +499,22 @@
require File::Copy;
my $mod = $INC{'Net/Config.pm'} or
- Carp::croak "Can't find myself";
+ Carp::croak("Can't find myself");
my $bak = $mod . "~";
print "Updating $mod...\n";
File::Copy::copy($mod,$bak) or
- Carp::croak "Cannot create backup file $bak: $!";
+ Carp::croak("Cannot create backup file $bak: $!");
print "...backup at $bak\n";
- my $old = new IO::File $bak,"r" or
- Carp::croak "Can't open $bak: $!";
+ my $old = new IO::File($bak,"r") or
+ Carp::croak("Can't open $bak: $!");
- my $new = new IO::File $mod,"w" or
- Carp::croak "Can't open $mod: $!";
+ my $new = new IO::File($mod,"w") or
+ Carp::croak("Can't open $mod: $!");
# If we fail below, then we must restore from backup
local $SIG{'__DIE__'} = sub {