about summary refs log tree commit
diff options
context:
space:
mode:
authorSteve Hay <steve.m.hay@googlemail.com>2015-07-17 08:19:05 +0100
committerSteve Hay <steve.m.hay@googlemail.com>2015-07-17 08:19:05 +0100
commitf418673741da4fad729da4bc2d3d53ca8e7f3c80 (patch)
tree0735f6346835260041834fdfa599a476f7b0e96e
parente7fccdef817134e612ec5669e451b23de952080c (diff)
downloadperl-libnet-f418673741da4fad729da4bc2d3d53ca8e7f3c80.tar.gz
Minor correction to 8b327f4281, confirmed by Steffen
-rw-r--r--lib/Net/FTP.pm2
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);