summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-06-23 03:46:18 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-06-23 03:46:18 +0000
commit9485e67879e02d29d4fd04b9d3ad50883b60019c (patch)
tree3f65cdd12a5fb74e03e731ed34507847df34009a /perl-install/any.pm
parent341be46445029addcc607955b58f86613ce43e61 (diff)
downloaddrakx-backup-do-not-use-9485e67879e02d29d4fd04b9d3ad50883b60019c.tar
drakx-backup-do-not-use-9485e67879e02d29d4fd04b9d3ad50883b60019c.tar.gz
drakx-backup-do-not-use-9485e67879e02d29d4fd04b9d3ad50883b60019c.tar.bz2
drakx-backup-do-not-use-9485e67879e02d29d4fd04b9d3ad50883b60019c.tar.xz
drakx-backup-do-not-use-9485e67879e02d29d4fd04b9d3ad50883b60019c.zip
kernelVersion() is unused (only bootloader::mkbootdisk() used it, and it has already been removed)
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm5
1 files changed, 0 insertions, 5 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 9679fb1fd..2683a6981 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -78,11 +78,6 @@ sub hdInstallPath() {
defined $tail && ($head ? "$head/$tail" : "/mnt/hd/$tail");
}
-sub kernelVersion() {
- my $kernel = readlink("$::prefix/boot/vmlinuz") || first(all("$::prefix/boot"));
- first($kernel =~ /vmlinuz-(.*)/);
-}
-
sub setupBootloader {
my ($in, $b, $all_hds, $fstab, $security) = @_;
my $hds = $all_hds->{hds};