From 1f6abba6caeaa38437aaafca9eae85cc79de01f3 Mon Sep 17 00:00:00 2001 From: Stew Benedict Date: Tue, 1 Jun 2004 15:40:47 +0000 Subject: Use array rather than hash per Thierry. Insure ftp transfers are binary, fix gui problem (in 10.0 update also). --- perl-install/standalone/drakbackup | 2 ++ 1 file changed, 2 insertions(+) (limited to 'perl-install/standalone/drakbackup') diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup index 1eb1e3cca..eff57c764 100755 --- a/perl-install/standalone/drakbackup +++ b/perl-install/standalone/drakbackup @@ -544,6 +544,7 @@ sub ftp_client() { $ftp = 0; } return 1 if !$ftp; + $ftp->binary(); $ftp->cwd($conf{HOST_PATH}); foreach (@file_list_to_send_by_ftp) { $interactive and $pbar->set_fraction(0); @@ -3605,6 +3606,7 @@ sub restore_ftp { else { $ftp = Net::FTP->new($hostname, Debug => 0) or return 1 } $ftp->login($username, $userpass); $ftp->cwd($hostpath); + $ftp->binary(); my $wild_card = catalog_to_wildcard($cat_entry); -- cgit v1.2.1