perl-libnet-Configure.patch

   1 diff -ur libnet-1.0703.orig/Configure libnet-1.0703/Configure
   2 --- libnet-1.0703.orig/Configure        Mon Jan 17 17:44:18 2000
   3 +++ libnet-1.0703/Configure     Wed Aug  2 20:51:54 2000
   4 @@ -312,8 +312,7 @@
   5
   6  $msg = 'Enter a list of available NNTP hosts :';
   7
   8 -$def = $oldcfg{'nntp_hosts'} ||
   9 -       [ default_hostname($ENV{NNTPSERVER},$ENV{NEWSHOST},'news') ];
  10 +$def = [];
  11
  12  $cfg{'nntp_hosts'} = get_host_list($msg,$def);
  13
  14 @@ -321,8 +320,7 @@
  15
  16  $msg = 'Enter a list of available SMTP hosts :';
  17
  18 -$def = $oldcfg{'smtp_hosts'} ||
  19 -       [ default_hostname(split(/:/,$ENV{SMTPHOSTS} || ""), 'mailhost') ];
  20 +$def = [];
  21
  22  $cfg{'smtp_hosts'} = get_host_list($msg,$def);
  23
  24 @@ -330,7 +328,7 @@
  25
  26  $msg = 'Enter a list of available POP3 hosts :';
  27
  28 -$def = $oldcfg{'pop3_hosts'} || [];
  29 +$def = [];
  30
  31  $cfg{'pop3_hosts'} = get_host_list($msg,$def);
  32
  33 @@ -338,7 +336,7 @@
  34
  35  $msg = 'Enter a list of available SNPP hosts :';
  36
  37 -$def = $oldcfg{'snpp_hosts'} || [];
  38 +$def = [];
  39
  40  $cfg{'snpp_hosts'} = get_host_list($msg,$def);
  41
  42 @@ -346,8 +344,7 @@
  43
  44  $msg = 'Enter a list of available PH Hosts   :'  ;
  45
  46 -$def = $oldcfg{'ph_hosts'} ||
  47 -       [ default_hostname('dirserv') ];
  48 +$def = [];
  49
  50  $cfg{'ph_hosts'}   =  get_host_list($msg,$def);
  51
  52 @@ -355,7 +352,7 @@
  53
  54  $msg = 'Enter a list of available TIME Hosts   :'  ;
  55
  56 -$def = $oldcfg{'time_hosts'} || [];
  57 +$def = [];
  58
  59  $cfg{'time_hosts'} = get_host_list($msg,$def);
  60
  61 @@ -363,7 +360,7 @@
  62
  63  $msg = 'Enter a list of available DAYTIME Hosts   :'  ;
  64
  65 -$def = $oldcfg{'daytime_hosts'} || $oldcfg{'time_hosts'};
  66 +$def = [];
  67
  68  $cfg{'daytime_hosts'} = get_host_list($msg,$def);
  69
  70 @@ -427,7 +424,7 @@
  71   $def = exists $oldcfg{'ftp_firewall_type'}  ? $oldcfg{'ftp_firewall_type'} : 1;
  72   $ans = Prompt($msg,$def);
  73   $cfg{'ftp_firewall_type'} = 0+$ans;
  74 - $def = $oldcfg{'ftp_firewall'} || $ENV{FTP_FIREWALL};
  75 + $def = [];
  76
  77   $cfg{'ftp_firewall'} = get_hostname("FTP proxy hostname :", $def);
  78  }