summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2003-03-26 15:57:40 +0000
committerFrancois Pons <fpons@mandriva.com>2003-03-26 15:57:40 +0000
commit5777b884e4f8b480be63513ea3baa7ff09ba6f14 (patch)
tree5fc3150736d8a3773632d6f72b7c3f1e43bda1c8 /perl-install
parent3552a6f26d0df98eec05e378e520fe2a39d86b57 (diff)
downloaddrakx-5777b884e4f8b480be63513ea3baa7ff09ba6f14.tar
drakx-5777b884e4f8b480be63513ea3baa7ff09ba6f14.tar.gz
drakx-5777b884e4f8b480be63513ea3baa7ff09ba6f14.tar.bz2
drakx-5777b884e4f8b480be63513ea3baa7ff09ba6f14.tar.xz
drakx-5777b884e4f8b480be63513ea3baa7ff09ba6f14.zip
fixed wrong usage of any::hdInstallPath which is mapped as /tmp/image during
installation.
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/bootloader.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 2331579d9..33708ed10 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -499,8 +499,8 @@ wait %d seconds for default boot.
#- add a restore entry if installation is done from disk, in order to allow redoing it.
if (my $hd_install_path = any::hdInstallPath()) {
- if (-e "$hd_install_path/boot/vmlinuz" && -e "$hd_install_path/boot/all.rdz" and
- my ($cmdline) = cat_("$hd_install_path/boot/menu.lst") =~ /kernel \S+\/boot\/vmlinuz (.*)$/) {
+ if (-e "/tmp/image/boot/vmlinuz" && -e "/tmp/image/boot/all.rdz" and
+ my ($cmdline) = cat_("/tmp/image/boot/menu.lst") =~ /kernel \S+\/boot\/vmlinuz (.*)$/) {
log::l("adding a restore bootloader entry on $hd_install_path");
add_entry($bootloader, {
type => 'image',
@@ -510,7 +510,7 @@ wait %d seconds for default boot.
append => $cmdline,
});
} else {
- log::l("no restore bootloader need to be used");
+ log::l("no restore bootloader need to be used on $hd_install_path");
}
}