diff options
author | Francois Pons <fpons@mandriva.com> | 2003-09-10 09:05:20 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2003-09-10 09:05:20 +0000 |
commit | b9a03fba6c89fc02883c06d0601b13d8e455dbff (patch) | |
tree | 2250b69ca3b8d9f06379a0605a5c3b8a63c44689 /perl-install | |
parent | 21896a8feca02597f18fc66dc2f8b61627fe6a44 (diff) | |
download | drakx-b9a03fba6c89fc02883c06d0601b13d8e455dbff.tar drakx-b9a03fba6c89fc02883c06d0601b13d8e455dbff.tar.gz drakx-b9a03fba6c89fc02883c06d0601b13d8e455dbff.tar.bz2 drakx-b9a03fba6c89fc02883c06d0601b13d8e455dbff.tar.xz drakx-b9a03fba6c89fc02883c06d0601b13d8e455dbff.zip |
save recovery file if disk installation.
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install2.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index 379e3408e..ce8954cc3 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -626,6 +626,10 @@ sub main { modules::write_conf($o->{prefix}); detect_devices::install_addons($o->{prefix}); + #- save recovery file if needed (ie disk style install). + $o->{method} eq 'disk' and + output($o->{prefix}.any::hdInstallPath()."/Mandrake/base/recovery.cfg", install_any::g_auto_install(1)); + #- mainly for auto_install's #- do not use run_program::xxx because it doesn't leave stdin/stdout unchanged system("bash", "-c", $o->{postInstallNonRooted}) if $o->{postInstallNonRooted}; |