$OpenBSD: patch-Makefile_PL,v 1.2 2003/06/30 12:27:09 wilfried Exp $
--- Makefile.PL.orig	Fri Jun  6 01:42:58 2003
+++ Makefile.PL	Mon Jun 30 13:26:57 2003
@@ -90,19 +90,8 @@ my $s = IO::Socket::INET->new(
 if ($s) {
 	close($s);
 
-	print <<EOT;
-
-You appear to be directly connected to the Internet.  I have some tests
-that try to query live nameservers.
-
-EOT
-
-	if (prompt("Do you want to enable these tests?", "y") =~ /^y/i) {
-		open(ENABLED, ">t/online.enabled") || die "Can't touch ./t/online.enabled $!";
-		close(ENABLED);
-	} else {
-		unlink("t/online.enabled"); # just to be shure...
-	}
+	open(ENABLED, ">t/online.enabled") || die "Can't touch ./t/online.enabled $!";
+	close(ENABLED);
 } else {
 	unlink("t/online.enabled"); # just to be shure...
 }
