From 0a4ef254c45f642a2bc7e2ff3d53c389e3a12e80 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 9 Sep 2004 07:00:04 +0000 Subject: remove unused variable --- 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 c98f61b10..86f3b1896 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -1066,7 +1066,7 @@ sub when_config_changed_lilo { log::l("Installing boot loader on $bootloader->{boot}..."); my $error; my $answer = $bootloader->{force_lilo_answer} || ''; - my $ok = run_program::rooted($::prefix, "echo $answer | lilo", '2>', \$error) or die "lilo failed: $error"; + run_program::rooted($::prefix, "echo $answer | lilo", '2>', \$error) or die "lilo failed: $error"; } } -- cgit v1.2.1