diff options
| author | Stew Benedict <stewb@mandriva.org> | 2004-01-23 19:42:42 +0000 |
|---|---|---|
| committer | Stew Benedict <stewb@mandriva.org> | 2004-01-23 19:42:42 +0000 |
| commit | 3fb49c5f884368a2cdb94b108a146e5a7dc89304 (patch) | |
| tree | 074d4d8e8a6ebb988af787464b6f40b2d797ecad /perl-install/standalone | |
| parent | d2654934a3de44a9f40a3546ce7555014c27c830 (diff) | |
| download | drakx-backup-do-not-use-3fb49c5f884368a2cdb94b108a146e5a7dc89304.tar drakx-backup-do-not-use-3fb49c5f884368a2cdb94b108a146e5a7dc89304.tar.gz drakx-backup-do-not-use-3fb49c5f884368a2cdb94b108a146e5a7dc89304.tar.bz2 drakx-backup-do-not-use-3fb49c5f884368a2cdb94b108a146e5a7dc89304.tar.xz drakx-backup-do-not-use-3fb49c5f884368a2cdb94b108a146e5a7dc89304.zip | |
perl_checker: assigned, but not read
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/drakbackup | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup index 50171531d..2644fb10b 100755 --- a/perl-install/standalone/drakbackup +++ b/perl-install/standalone/drakbackup @@ -1198,7 +1198,6 @@ sub build_backup_files() { my $tar_cmd_sys; my $tar_cmd_user; my $tar_cmd_other; - my $base_sys_exist = 0; my @dir_content; my $incr; my $find_args = "! -type d"; @@ -1243,8 +1242,7 @@ sub build_backup_files() { $backupignore && -f "/etc/.backupignore" and $tar_cmd_sys .= " -X /etc/.backupignore"; -d $save_path and @dir_content = all($save_path); - any { /^backup_base_sys/ } @dir_content and $base_sys_exist = 1; - + if ($where_hd && !$daemon || $daemon) { $interactive and progress($pbar, $plabel, 0.5, N("Backup system files...")); if ($backup_sys) { @@ -3348,13 +3346,12 @@ sub restore_step_user() { sub restore_step_sys() { my $restore_step_sys; - my $check_backup_before; my $combo_restore_step_sys = new Gtk2::OptionMenu(); $combo_restore_step_sys->set_popdown_strings(@sys_backuped); gtkpack($advanced_box, $restore_step_sys = gtkpack_(new Gtk2::VBox(0,10), 1, new Gtk2::VBox(0,10), - 0, $check_backup_before = new Gtk2::CheckButton(N("Backup the system files before:")), + 0, new Gtk2::CheckButton(N("Backup the system files before:")), 0, gtkpack_(new Gtk2::HBox(0,10), 1, N("please choose the date to restore"), 0, $combo_restore_step_sys, |