diff options
| author | Stew Benedict <stewb@mandriva.org> | 2004-06-01 20:02:02 +0000 |
|---|---|---|
| committer | Stew Benedict <stewb@mandriva.org> | 2004-06-01 20:02:02 +0000 |
| commit | 4a11e67099646c505d02012354fe1a35c1b72ef2 (patch) | |
| tree | eec13defd595f2fbef0f7659d0d3a2530a80d042 /perl-install/standalone/drakbackup | |
| parent | 65ecc0d8319556c26a3c734336f0218641ae23c2 (diff) | |
| download | drakx-4a11e67099646c505d02012354fe1a35c1b72ef2.tar drakx-4a11e67099646c505d02012354fe1a35c1b72ef2.tar.gz drakx-4a11e67099646c505d02012354fe1a35c1b72ef2.tar.bz2 drakx-4a11e67099646c505d02012354fe1a35c1b72ef2.tar.xz drakx-4a11e67099646c505d02012354fe1a35c1b72ef2.zip | |
Binary ftp/gui fixes from cooker branch.
Diffstat (limited to 'perl-install/standalone/drakbackup')
| -rwxr-xr-x | perl-install/standalone/drakbackup | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup index abb7ff645..26af55fd3 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); @@ -3064,7 +3065,8 @@ sub restore_step2() { my $sys_exist; my $user_exist; local $_; - + destroy_widget(); + my $restore_info_path = $conf{PATH_TO_SAVE}; $restore_info_path = $path_to_find_restore if $conf{USE_HD} || $conf{USE_CD}; my $info_prefix = "backup"; @@ -3274,7 +3276,8 @@ sub catalog_restore { my $cat_entry; my @restore_files; my $restore_path_entry; - + destroy_widget(); + #- catalog info in tree view my $model = Gtk2::TreeStore->new("Glib::String"); my $tree_catalog = Gtk2::TreeView->new_with_model($model); @@ -3605,6 +3608,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); |