diff options
author | Steve Hay <steve.m.hay@googlemail.com> | 2015-07-17 08:19:05 +0100 |
---|---|---|
committer | Steve Hay <steve.m.hay@googlemail.com> | 2015-07-17 08:19:05 +0100 |
commit | f418673741da4fad729da4bc2d3d53ca8e7f3c80 (patch) | |
tree | 0735f6346835260041834fdfa599a476f7b0e96e | |
parent | e7fccdef817134e612ec5669e451b23de952080c (diff) | |
download | perl-libnet-f418673741da4fad729da4bc2d3d53ca8e7f3c80.tar.gz |
Minor correction to 8b327f4281, confirmed by Steffen
-rw-r--r-- | lib/Net/FTP.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Net/FTP.pm b/lib/Net/FTP.pm index 9f235a6..9278589 100644 --- a/lib/Net/FTP.pm +++ b/lib/Net/FTP.pm @@ -137,7 +137,7 @@ sub new { ${*$ftp}{'net_ftp_blksize'} = abs($arg{'BlockSize'} || 10240); ${*$ftp}{'net_ftp_localaddr'} = $arg{'LocalAddr'}; - ${*$ftp}{'net_ftp_family'} = $arg{Domain} || $arg{Family}; + ${*$ftp}{'net_ftp_domain'} = $arg{Domain} || $arg{Family}; ${*$ftp}{'net_ftp_firewall'} = $fire if (defined $fire); |