From e93ca98dd5aad191b20c0da0b86f21ad5e12dcd7 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 28 Nov 2002 01:08:19 +0000
Subject: perl_checker adaptations

---
 perl-install/bootloader.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/bootloader.pm')

diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 3dc16deaf..0b838ba52 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -662,7 +662,7 @@ sub install_yaboot {
     output($f, "$of_dev\n");  
     $::testing and return;
     if (defined $install_steps_interactive::new_bootstrap) {
-	run_program::run("hformat", "$lilo->{boot}") or die "hformat failed";
+	run_program::run("hformat", $lilo->{boot}) or die "hformat failed";
     }	
     run_program::rooted_or_die($::prefix, "/usr/sbin/ybin", "2>", "/tmp/.error");
     unlink "$::prefix/tmp/.error";	
-- 
cgit v1.2.1