#
#========================================================================
#
-# Version 2.0.0_CVS, released 18 Jan 2003.
+# Version 2.0.0beta2, released 13 Apr 2003.
#
# See http://backuppc.sourceforge.net.
#
my($t) = @_;
my $bpc = $t->{bpc};
my $conf = $t->{conf};
- my $I_option = $t->{hostIP} eq $t->{host} ? "" : " -I $t->{hostIP}";
+ my $I_option = $t->{hostIP} eq $t->{host} ? [] : ['-I', $t->{hostIP}];
my(@fileList, $X_option, $smbClientCmd, $logMsg);
my($timeStampFile);
local(*SMB);
{
my($t) = @_;
- return $t->{xferPid};
+ return ($t->{xferPid});
}
sub logMsg