From 1e438db0a3bba659e5c5e8aec5194ea3fc3233d9 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 22 Jan 2003 00:15:50 +0000 Subject: - remove createBootdisk step - add mkbootdisk option in setupBootloader__general() - move kernelVersion() from install_any to any --- perl-install/install_any.pm | 7 ------- 1 file changed, 7 deletions(-) (limited to 'perl-install/install_any.pm') diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 52516eef1..af259f7dd 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -210,13 +210,6 @@ sub allowNVIDIA_rpms { #-###################################################################################### #- Functions #-###################################################################################### -sub kernelVersion { - my ($o) = @_; - my $kernel = readlink "$o->{prefix}/boot/vmlinuz" || first(all("$o->{prefix}/boot")); - first($kernel =~ /vmlinuz-(.*)/); -} - - sub getNextStep { my ($s) = $::o->{steps}{first}; $s = $::o->{steps}{$s}{next} while $::o->{steps}{$s}{done} || !$::o->{steps}{$s}{reachable}; -- cgit v1.2.1