From aee1d3319b2a7901e799c41cd9a6b2de91dea5b8 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 10 Feb 2016 23:46:35 +0100 Subject: (remove_kernel_generic) split it out --- perl-install/standalone/bootloader-config | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'perl-install/standalone/bootloader-config') diff --git a/perl-install/standalone/bootloader-config b/perl-install/standalone/bootloader-config index 9b6a021de..e61dbd453 100755 --- a/perl-install/standalone/bootloader-config +++ b/perl-install/standalone/bootloader-config @@ -98,6 +98,12 @@ sub remove_kernel() { return; } + remove_kernel_generic(); + + modify_bootloader(); +} + +sub remove_kernel_generic() { my %proposed_labels; my @new_entries; @@ -132,8 +138,6 @@ sub remove_kernel() { my ($kernel_str, $v) = @$_; bootloader::add_kernel($bootloader, $kernel_str, $v); } - - modify_bootloader(); } -- cgit v1.2.1