summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/bootloader.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 18beed706..0b275e6ba 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -889,7 +889,7 @@ sub create_link_source() {
}
}
-sub get_of_dev {
+sub dev2yaboot {
my ($dev) = @_;
devices::make("$::prefix$dev"); #- create it in the chroot
@@ -914,7 +914,7 @@ sub write_yaboot {
my $file2yaboot = sub {
my ($part, $file) = fs::get::file2part($fstab, $_[0]);
- get_of_dev('/dev/' . $part->{device}) . "," . $file;
+ dev2yaboot('/dev/' . $part->{device}) . "," . $file;
};
#- do not write yaboot.conf for old-world macs
@@ -941,7 +941,7 @@ sub write_yaboot {
if ($bootloader->{boot}) {
push @conf, "boot=$bootloader->{boot}";
- push @conf, "ofboot=" . get_of_dev($bootloader->{boot}) if $mac_type !~ /IBM/;
+ push @conf, "ofboot=" . dev2yaboot($bootloader->{boot}) if $mac_type !~ /IBM/;
} else {
die "no bootstrap partition defined.";
}
@@ -968,7 +968,7 @@ sub write_yaboot {
push @entry_conf, $entry->{'read-write'} ? "read-write" : "read-only";
push @conf, map { "\t$_" } @entry_conf;
} else {
- my $of_dev = get_of_dev($entry->{kernel_or_dev});
+ my $of_dev = dev2yaboot($entry->{kernel_or_dev});
push @conf, "$entry->{label}=$of_dev";
}
}