diff options
author | Stew Benedict <stewb@mandriva.org> | 2004-01-26 18:38:36 +0000 |
---|---|---|
committer | Stew Benedict <stewb@mandriva.org> | 2004-01-26 18:38:36 +0000 |
commit | ef85643cd8fe0ce9c7ffba731d964d4e94485f8b (patch) | |
tree | a150a69e942734e085fae85da45283900288a068 /perl-install | |
parent | a95979777de7427cd1698ccfea6551025a960e13 (diff) | |
download | drakx-backup-do-not-use-ef85643cd8fe0ce9c7ffba731d964d4e94485f8b.tar drakx-backup-do-not-use-ef85643cd8fe0ce9c7ffba731d964d4e94485f8b.tar.gz drakx-backup-do-not-use-ef85643cd8fe0ce9c7ffba731d964d4e94485f8b.tar.bz2 drakx-backup-do-not-use-ef85643cd8fe0ce9c7ffba731d964d4e94485f8b.tar.xz drakx-backup-do-not-use-ef85643cd8fe0ce9c7ffba731d964d4e94485f8b.zip |
Another cron issue reported on Anthill.
Diffstat (limited to 'perl-install')
-rwxr-xr-x | perl-install/standalone/drakbackup | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup index 2644fb10b..9900d7f7b 100755 --- a/perl-install/standalone/drakbackup +++ b/perl-install/standalone/drakbackup @@ -150,7 +150,6 @@ my $use_expect = 0; my $xfer_keys = 0; my $user_keys = 1; my $user_home = $ENV{HOME}; -my $backup_key = $user_home . "/.ssh/identity-drakbackup"; my $nonroot_user = 0; my $media_problem = 0; my $vol_name = 'Drakbackup'; @@ -174,8 +173,11 @@ if ($ENV{USER} ne 'root' && $ENV{HOME} ne '/root') { $nonroot_user = 1; $backup_sys = 0; @user_list = $ENV{USER}; +} else { + $user_home = "/root"; } $cfg_file = $cfg_dir . "drakbackup.conf"; +my $backup_key = $user_home . "/.ssh/identity-drakbackup"; foreach (@ARGV) { @@ -3351,7 +3353,6 @@ sub restore_step_sys() { gtkpack($advanced_box, $restore_step_sys = gtkpack_(new Gtk2::VBox(0,10), 1, new Gtk2::VBox(0,10), - 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, |