Use array rather than hash per Thierry.

Insure ftp transfers are binary, fix gui problem (in 10.0 update also).

1 files changed, 2 insertions, 0 deletions

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);