1
0
mirror of https://git.FreeBSD.org/ports.git synced 2024-11-13 23:36:08 +00:00
freebsd-ports/net/p5-Net/files/patch-aa
1998-04-26 02:45:51 +00:00

228 lines
6.9 KiB
Plaintext

--- Configure.orig Wed Nov 5 11:27:54 1997
+++ Configure Sun Apr 26 10:35:56 1998
@@ -195,18 +195,19 @@
#---------------------------------------------------------------------------
-if(!-f $config_pm && $have_old && !$opt_d)
- {
- $msg = <<EDQ;
-
-Ah, I see you already have installed libnet before.
-
-Do you want to modify/update your configuration (y|n) ?
-EDQ
-
- $opt_d = 1
- unless get_bool($msg,0);
- }
+#if(!-f $config_pm && $have_old && !$opt_d)
+# {
+# $msg = <<EDQ;
+#
+#Ah, I see you already have installed libnet before.
+#
+#Do you want to modify/update your configuration (y|n) ?
+#EDQ
+#
+# $opt_d = 1
+# unless get_bool($msg,0);
+# }
+$opt_d = 0;
#---------------------------------------------------------------------------
@@ -223,7 +224,8 @@
Do you want me to perform hostname lookups (y|n) ?
EDQ
-$cfg{'test_exist'} = get_bool($msg, $oldcfg{'test_exist'});
+#$cfg{'test_exist'} = get_bool($msg, $oldcfg{'test_exist'});
+$cfg{'test_exist'} = 1;
print <<EDQ unless $cfg{'test_exist'};
@@ -238,71 +240,78 @@
#---------------------------------------------------------------------------
-print <<EDQ;
-
-The following questions all require a list of host names, separated
-with spaces. If you do not have a host available for any of the
-services, then enter a single space, followed by <CR>. To accept the
-default, hit <CR>
-
-EDQ
+#print <<EDQ;
+#
+#The following questions all require a list of host names, separated
+#with spaces. If you do not have a host available for any of the
+#services, then enter a single space, followed by <CR>. To accept the
+#default, hit <CR>
+#
+#EDQ
$msg = 'Enter a list of available NNTP hosts :';
-$def = $oldcfg{'nntp_hosts'} ||
- [ default_hostname($ENV{NNTPSERVER},$ENV{NEWSHOST},'news') ];
+#$def = $oldcfg{'nntp_hosts'} ||
+# [ default_hostname($ENV{NNTPSERVER},$ENV{NEWSHOST},'news') ];
-$cfg{'nntp_hosts'} = get_host_list($msg,$def);
+#$cfg{'nntp_hosts'} = get_host_list($msg,$def);
+$cfg{'nntp_hosts'} = [ default_hostname($ENV{NNTPSERVER}, $ENV{NEWSHOST}, 'news') ];
#---------------------------------------------------------------------------
$msg = 'Enter a list of available SMTP hosts :';
-$def = $oldcfg{'smtp_hosts'} ||
- [ default_hostname(split(/:/,$ENV{SMTPHOSTS} || ""), 'mailhost') ];
+#$def = $oldcfg{'smtp_hosts'} ||
+# [ default_hostname(split(/:/,$ENV{SMTPHOSTS} || ""), 'mailhost') ];
-$cfg{'smtp_hosts'} = get_host_list($msg,$def);
+#$cfg{'smtp_hosts'} = get_host_list($msg,$def);
+$cfg{'smtp_hosts'} = [ default_hostname(split(/:/,$ENV{SMTPHOSTS} || ""), 'mailhost') ];
#---------------------------------------------------------------------------
$msg = 'Enter a list of available POP3 hosts :';
-$def = $oldcfg{'pop3_hosts'} || [];
+#$def = $oldcfg{'pop3_hosts'} || [];
-$cfg{'pop3_hosts'} = get_host_list($msg,$def);
+#$cfg{'pop3_hosts'} = get_host_list($msg,$def);
+$cfg{'pop3_hosts'} = [];
#---------------------------------------------------------------------------
$msg = 'Enter a list of available SNPP hosts :';
-$def = $oldcfg{'snpp_hosts'} || [];
+#$def = $oldcfg{'snpp_hosts'} || [];
-$cfg{'snpp_hosts'} = get_host_list($msg,$def);
+#$cfg{'snpp_hosts'} = get_host_list($msg,$def);
+$cfg{'snpp_hosts'} = [];
#---------------------------------------------------------------------------
$msg = 'Enter a list of available PH Hosts :' ;
-$def = $oldcfg{'ph_hosts'} ||
- [ default_hostname('dirserv') ];
+#$def = $oldcfg{'ph_hosts'} ||
+# [ default_hostname('dirserv') ];
-$cfg{'ph_hosts'} = get_host_list($msg,$def);
+#$cfg{'ph_hosts'} = get_host_list($msg,$def);
+$cfg{'ph_hosts'} = [ default_hostname('dirserv') ];
#---------------------------------------------------------------------------
$msg = 'Enter a list of available TIME Hosts :' ;
-$def = $oldcfg{'time_hosts'} || [];
+#$def = $oldcfg{'time_hosts'} || [];
-$cfg{'time_hosts'} = get_host_list($msg,$def);
+#$cfg{'time_hosts'} = get_host_list($msg,$def);
+$cfg{'time_hosts'} = [];
#---------------------------------------------------------------------------
$msg = 'Enter a list of available DAYTIME Hosts :' ;
-$def = $oldcfg{'daytime_hosts'} || $oldcfg{'time_hosts'};
+#$def = $oldcfg{'daytime_hosts'} || $oldcfg{'time_hosts'};
-$cfg{'daytime_hosts'} = get_host_list($msg,$def);
+#$cfg{'daytime_hosts'} = get_host_list($msg,$def);
+$cfg{'daytime_hosts'} = [];
#---------------------------------------------------------------------------
@@ -318,9 +327,10 @@
FTP proxy hostname :
EDQ
-$def = $oldcfg{'ftp_firewall'} || $ENV{FTP_FIREWALL};
+#$def = $oldcfg{'ftp_firewall'} || $ENV{FTP_FIREWALL};
-$cfg{'ftp_firewall'} = get_hostname($msg,$def);
+#$cfg{'ftp_firewall'} = get_hostname($msg,$def);
+$cfg{'ftp_firewall'} = $ENV{FTP_FIREWALL};
#---------------------------------------------------------------------------
@@ -341,37 +351,39 @@
#---------------------------------------------------------------------------
-print <<EDQ;
-
-Normally when FTP needs a data connection the client tells the server
-a port to connect to, and the server initiates a connection to the client.
-
-Some setups, in particular firewall setups, can/do not work using this
-protocol. In these situations the client must make the connection to the
-server, this is called a passive transfer.
-EDQ
+#print <<EDQ;
+#
+#Normally when FTP needs a data connection the client tells the server
+#a port to connect to, and the server initiates a connection to the client.
+#
+#Some setups, in particular firewall setups, can/do not work using this
+#protocol. In these situations the client must make the connection to the
+#server, this is called a passive transfer.
+#EDQ
$msg = "\nShould all FTP connections via a firewall/proxy be passive (y|n) ?";
-$def = $oldcfg{'ftp_ext_passive'} || 0;
+#$def = $oldcfg{'ftp_ext_passive'} || 0;
-$cfg{'ftp_ext_passive'} = get_bool($msg,$def);
+#$cfg{'ftp_ext_passive'} = get_bool($msg,$def);
-$def = $oldcfg{'ftp_int_passive'} || 0;
+#$def = $oldcfg{'ftp_int_passive'} || 0;
$msg = "\nShould all other FTP connections be passive (y|n) ?";
-$cfg{'ftp_int_passive'} = get_bool($msg,$def);
+#$cfg{'ftp_int_passive'} = get_bool($msg,$def);
+$cfg{'ftp_int_passive'} = 0;
#---------------------------------------------------------------------------
-$def = $oldcfg{'inet_domain'} || $ENV{LOCALDOMAIN};
+#$def = $oldcfg{'inet_domain'} || $ENV{LOCALDOMAIN};
-$ans = Prompt("\nWhat is your local internet domain name :",$def);
+#$ans = Prompt("\nWhat is your local internet domain name :",$def);
-$cfg{'inet_domain'} = ($ans =~ /(\S+)/)[0];
+#$cfg{'inet_domain'} = ($ans =~ /(\S+)/)[0];
+$cfg{'inet_domain'} = "";
#---------------------------------------------------------------------------
@@ -387,7 +399,8 @@
Do you want me to run these tests (y|n) ?
EDQ
-$cfg{'test_hosts'} = get_bool($msg,$oldcfg{'test_hosts'});
+#$cfg{'test_hosts'} = get_bool($msg,$oldcfg{'test_hosts'});
+$cfg{'test_hosts'} = 0;
#---------------------------------------------------------------------------