From 4a0728d268512461d163026828435174101a7e7d Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 14 Jan 2009 12:54:02 +0000 Subject: cleanup --- perl-install/bootloader.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/bootloader.pm') diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index b7c7d6a5b..d0173e17b 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -161,7 +161,7 @@ sub update_splash { my ($bootloader) = @_; foreach (@{$bootloader->{entries}}) { - bootloader::add_boot_splash($_->{initrd}, $_->{vga} || $bootloader->{vga}) if $_->{initrd}; + add_boot_splash($_->{initrd}, $_->{vga} || $bootloader->{vga}) if $_->{initrd}; } } @@ -1852,7 +1852,7 @@ sub install { sub ensure_pkg_is_installed { my ($do_pkgs, $bootloader) = @_; - my $main_method = bootloader::main_method($bootloader->{method}); + my $main_method = main_method($bootloader->{method}); if ($main_method eq 'grub' || $main_method eq 'lilo') { $do_pkgs->ensure_binary_is_installed($main_method, $main_method, 1) or return 0; if ($bootloader->{method} eq 'grub-graphic') { -- cgit v1.2.1