diff options
author | Guillaume Cottenceau <gc@mandriva.com> | 2002-01-29 22:38:31 +0000 |
---|---|---|
committer | Guillaume Cottenceau <gc@mandriva.com> | 2002-01-29 22:38:31 +0000 |
commit | a219b373c051fdc3e932634a31b15b4fa4e983ff (patch) | |
tree | 76037d6c553e543cf4db603576e3c9ca8e80c23e /perl-install/install_steps.pm | |
parent | c6112f999b11dbf57a12cabd4bfa277fde6704e8 (diff) | |
download | drakx-backup-do-not-use-a219b373c051fdc3e932634a31b15b4fa4e983ff.tar drakx-backup-do-not-use-a219b373c051fdc3e932634a31b15b4fa4e983ff.tar.gz drakx-backup-do-not-use-a219b373c051fdc3e932634a31b15b4fa4e983ff.tar.bz2 drakx-backup-do-not-use-a219b373c051fdc3e932634a31b15b4fa4e983ff.tar.xz drakx-backup-do-not-use-a219b373c051fdc3e932634a31b15b4fa4e983ff.zip |
move /root/* files (ddebug.log, install.log, report.bug,
auto_inst.cfg.pl, replay_install.img) to /root/drakx/,
and also save stage1.log there
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r-- | perl-install/install_steps.pm | 15 |
1 files changed, 11 insertions, 4 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 7352b0476..a2a43e6dc 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -49,7 +49,7 @@ sub leavingStep { log::l("step `$step' finished"); if (-d "$o->{prefix}/root") { - eval { cp_af("/tmp/ddebug.log", "$o->{prefix}/root") }; + eval { cp_af("/tmp/ddebug.log", "$o->{prefix}/root/drakx") }; output(install_any::auto_inst_file(), install_any::g_auto_install()); } @@ -382,7 +382,7 @@ sub afterInstallPackages($) { die _("Some important packages didn't get installed properly. Either your cdrom drive or your cdrom is defective. Check the cdrom on an installed computer using \"rpm -qpl Mandrake/RPMS/*.rpm\" -") if grep { m|read failed: Input/output error| } cat_("$o->{prefix}/root/install.log"); +") if grep { m|read failed: Input/output error| } cat_("$o->{prefix}/root/drakx/install.log"); if (arch() !~ /^sparc/) { #- TODO restore it as may be needed for sparc -x "$o->{prefix}/usr/bin/dumpkeys" or $::testing or die @@ -939,8 +939,15 @@ sub miscellaneous { #------------------------------------------------------------------------------ sub exitInstall { my ($o) = @_; - eval { output "$o->{prefix}/root/report.bug", install_any::report_bug($o->{prefix}) }; - install_any::getAndSaveAutoInstallFloppy($o, 1, "$o->{prefix}/root/replay_install.img"); + eval { output "$o->{prefix}/root/drakx/report.bug", install_any::report_bug($o->{prefix}) }; + install_any::getAndSaveAutoInstallFloppy($o, 1, "$o->{prefix}/root/drakx/replay_install.img" ); + eval { output "$o->{prefix}/root/drakx/README", "This directory contains several installation-related files, +mostly log files (very useful if you ever report a bug!). + +Beware that some Mandrake tools rely on the contents of some +of these files... so remove any file from here at your own +risk! +" }; install_any::unlockCdrom; install_any::log_sizes($o); } |