summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-11-16 09:41:24 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-11-16 09:41:24 +0000
commit81966041225bbca4aae4acf0cf141645dffedc03 (patch)
tree6751d22ad35f30982b77614a543bffd375c487c7 /perl-install
parent6d357770b156ad68d35abee0a79057460d77e330 (diff)
downloaddrakx-backup-do-not-use-81966041225bbca4aae4acf0cf141645dffedc03.tar
drakx-backup-do-not-use-81966041225bbca4aae4acf0cf141645dffedc03.tar.gz
drakx-backup-do-not-use-81966041225bbca4aae4acf0cf141645dffedc03.tar.bz2
drakx-backup-do-not-use-81966041225bbca4aae4acf0cf141645dffedc03.tar.xz
drakx-backup-do-not-use-81966041225bbca4aae4acf0cf141645dffedc03.zip
rename get_of_dev() -> dev2yaboot()
Diffstat (limited to 'perl-install')
-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";
}
}