From 587c9a47bf5739a4927c725f9bc0db818711cb2d Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 1 Aug 2002 11:34:37 +0000 Subject: get rid of some $prefix parameter passing --- perl-install/install_steps.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/install_steps.pm') diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 9995f2b52..d1509224b 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -763,7 +763,7 @@ sub createBootdisk($) { return if $::testing; require bootloader; - bootloader::mkbootdisk($o->{prefix}, install_any::kernelVersion($o), $dev, $o->{bootloader}{perImageAppend}); + bootloader::mkbootdisk(install_any::kernelVersion($o), $dev, $o->{bootloader}{perImageAppend}); $o->{mkbootdisk} = $dev; } @@ -875,7 +875,7 @@ sub setupBootloader($) { # map { /$o->{prefix}(.*)/ } eval { glob_("$o->{prefix}/boot/vmlinux*") }; } else { require bootloader; - bootloader::install($o->{prefix}, $o->{bootloader}, $o->{fstab}, $o->{all_hds}{hds}); + bootloader::install($o->{bootloader}, $o->{fstab}, $o->{all_hds}{hds}); } } -- cgit v1.2.1