perl-libnet-Configure.patch

   1 --- libnet-3.02/Configure.orig  2014-10-11 00:59:32.000000000 +0200
   2 +++ libnet-3.02/Configure       2014-10-27 17:50:29.824984858 +0100
   3 @@ -322,8 +322,7 @@
   4
   5  $msg = 'Enter a list of available NNTP hosts :';
   6
   7 -$def = $oldcfg{'nntp_hosts'} ||
   8 -        [ default_hostname($ENV{NNTPSERVER},$ENV{NEWSHOST},'news') ];
   9 +$def = [];
  10
  11  $cfg{'nntp_hosts'} = get_host_list($msg,$def);
  12
  13 @@ -331,8 +330,7 @@
  14
  15  $msg = 'Enter a list of available SMTP hosts :';
  16
  17 -$def = $oldcfg{'smtp_hosts'} ||
  18 -        [ default_hostname(split(/:/,$ENV{SMTPHOSTS} || ""), 'mailhost') ];
  19 +$def = [];
  20
  21  $cfg{'smtp_hosts'} = get_host_list($msg,$def);
  22
  23 @@ -340,7 +338,7 @@
  24
  25  $msg = 'Enter a list of available POP3 hosts :';
  26
  27 -$def = $oldcfg{'pop3_hosts'} || [];
  28 +$def = [];
  29
  30  $cfg{'pop3_hosts'} = get_host_list($msg,$def);
  31
  32 @@ -348,7 +346,7 @@
  33
  34  $msg = 'Enter a list of available SNPP hosts :';
  35
  36 -$def = $oldcfg{'snpp_hosts'} || [];
  37 +$def = [];
  38
  39  $cfg{'snpp_hosts'} = get_host_list($msg,$def);
  40
  41 @@ -356,8 +354,7 @@
  42
  43  $msg = 'Enter a list of available PH Hosts   :'  ;
  44
  45 -$def = $oldcfg{'ph_hosts'} ||
  46 -        [ default_hostname('dirserv') ];
  47 +$def = [];
  48
  49  $cfg{'ph_hosts'}   =  get_host_list($msg,$def);
  50
  51 @@ -365,7 +362,7 @@
  52
  53  $msg = 'Enter a list of available TIME Hosts   :'  ;
  54
  55 -$def = $oldcfg{'time_hosts'} || [];
  56 +$def = [];
  57
  58  $cfg{'time_hosts'} = get_host_list($msg,$def);
  59
  60 @@ -373,7 +370,7 @@
  61
  62  $msg = 'Enter a list of available DAYTIME Hosts   :'  ;
  63
  64 -$def = $oldcfg{'daytime_hosts'} || $oldcfg{'time_hosts'};
  65 +$def = [];
  66
  67  $cfg{'daytime_hosts'} = get_host_list($msg,$def);
  68
  69 @@ -437,7 +434,7 @@
  70   $def = exists $oldcfg{'ftp_firewall_type'}  ? $oldcfg{'ftp_firewall_type'} : 1;
  71   $ans = Prompt($msg,$def);
  72   $cfg{'ftp_firewall_type'} = 0+$ans;
  73 - $def = $oldcfg{'ftp_firewall'} || $ENV{FTP_FIREWALL};
  74 + $def = [];
  75
  76   $cfg{'ftp_firewall'} = get_hostname("FTP proxy hostname :", $def);
  77  }