summaryrefslogtreecommitdiff
path: root/net/p5-Net/patches
diff options
context:
space:
mode:
authorhubertf <hubertf>1997-11-22 04:52:46 +0000
committerhubertf <hubertf>1997-11-22 04:52:46 +0000
commitc728d2f33e202fa9267971879045538ea1b691e3 (patch)
tree89145acf5f079bc81f9bba88a8d3a54609415f7a /net/p5-Net/patches
parent392e325212b8d084c871535d211324bb94b3faee (diff)
downloadpkgsrc-c728d2f33e202fa9267971879045538ea1b691e3.tar.gz
Network access, for p5-libwww
Diffstat (limited to 'net/p5-Net/patches')
-rw-r--r--net/p5-Net/patches/patch-aa218
1 files changed, 218 insertions, 0 deletions
diff --git a/net/p5-Net/patches/patch-aa b/net/p5-Net/patches/patch-aa
new file mode 100644
index 00000000000..959a2751e9b
--- /dev/null
+++ b/net/p5-Net/patches/patch-aa
@@ -0,0 +1,218 @@
+--- Configure.orig Thu Apr 3 10:16:13 1997
++++ Configure Thu Jun 26 20:13:51 1997
+@@ -206,18 +206,21 @@
+
+ #---------------------------------------------------------------------------
+
+-if(!-f $config_pm && $have_old && !$opt_d)
+- {
+- $msg = <<EDQ;
++#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);
++# }
++#
+
+-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;
+
+ #---------------------------------------------------------------------------
+
+@@ -234,7 +237,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'};
+
+@@ -249,71 +253,72 @@
+
+ #---------------------------------------------------------------------------
+
+-print <<EDQ;
+-
+-The following questions all require a list of host names, separated
+-with spaces. If you do not have a host avaliable 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 avaliable 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 avaliable 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'} = [ default_hostname($ENV{NNTPSERVER},$ENV{NEWSHOST},'news') ];
+
+-$cfg{'nntp_hosts'} = get_host_list($msg,$def);
+
+ #---------------------------------------------------------------------------
+
+ $msg = 'Enter a list of avaliable 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'} = [ default_hostname(split(/:/,$ENV{SMTPHOSTS} || ""), 'mailhost') ];
+
+ #---------------------------------------------------------------------------
+
+ $msg = 'Enter a list of avaliable POP3 hosts :';
+
+-$def = $oldcfg{'pop3_hosts'} || [];
++# $def = $oldcfg{'pop3_hosts'} || [];
+
+-$cfg{'pop3_hosts'} = get_host_list($msg,$def);
++$cfg{'pop3_hosts'} = [];
+
+ #---------------------------------------------------------------------------
+
+ $msg = 'Enter a list of avaliable SNPP hosts :';
+
+-$def = $oldcfg{'snpp_hosts'} || [];
++# $def = $oldcfg{'snpp_hosts'} || [];
+
+-$cfg{'snpp_hosts'} = get_host_list($msg,$def);
++$cfg{'snpp_hosts'} = [];
+
+ #---------------------------------------------------------------------------
+
+ $msg = 'Enter a list of avaliable 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'} = [ default_hostname('dirserv') ];
+
+ #---------------------------------------------------------------------------
+
+ $msg = 'Enter a list of avaliable TIME Hosts :' ;
+
+-$def = $oldcfg{'time_hosts'} || [];
++# $def = $oldcfg{'time_hosts'} || [];
+
+-$cfg{'time_hosts'} = get_host_list($msg,$def);
++$cfg{'time_hosts'} = [];
+
+ #---------------------------------------------------------------------------
+
+ $msg = 'Enter a list of avaliable 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'} = [];
+
+ #---------------------------------------------------------------------------
+
+@@ -329,9 +334,9 @@
+ 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'} = $ENV{FTP_FIREWALL};
+
+ #---------------------------------------------------------------------------
+
+@@ -352,37 +357,36 @@
+
+ #---------------------------------------------------------------------------
+
+-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;
+-
+-$cfg{'ftp_ext_passive'} = get_bool($msg,$def);
++# $def = $oldcfg{'ftp_ext_passive'} || 0;
+
++$cfg{'ftp_ext_passive'} = 0;
+
+-$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'} = 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'} = "";
+
+ #---------------------------------------------------------------------------
+
+@@ -398,7 +402,7 @@
+ Do you want me to run these tests (y|n) ?
+ EDQ
+
+-$cfg{'test_hosts'} = get_bool($msg,$oldcfg{'test_hosts'});
++$cfg{'test_hosts'} = 0;
+
+ #---------------------------------------------------------------------------
+
generated by cgit v1.2.3 (git 2.39.1) at 2025-03-29 10:53:03 +0000