summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mandriva.org>2009-02-10 10:06:42 +0000
committerPascal Terjan <pterjan@mandriva.org>2009-02-10 10:06:42 +0000
commitbdf616f404eb81f2a6456ab95a3851df0cb3aaf7 (patch)
treed229691e942e437428e5032aaf23a1c1786bf26c /perl-install
parent6d29e7d3548c13da75846c7d6cbc072438a2288c (diff)
downloaddrakx-backup-do-not-use-bdf616f404eb81f2a6456ab95a3851df0cb3aaf7.tar
drakx-backup-do-not-use-bdf616f404eb81f2a6456ab95a3851df0cb3aaf7.tar.gz
drakx-backup-do-not-use-bdf616f404eb81f2a6456ab95a3851df0cb3aaf7.tar.bz2
drakx-backup-do-not-use-bdf616f404eb81f2a6456ab95a3851df0cb3aaf7.tar.xz
drakx-backup-do-not-use-bdf616f404eb81f2a6456ab95a3851df0cb3aaf7.zip
Use fs::get::part2hd instead of reinventing it
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/bootloader.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 095c581d2..c0245852c 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -981,7 +981,7 @@ sub suggest {
# If installing onto an USB drive, put the mbr there, else on the first non removable drive
if ($root_part->{is_removable}) {
- $mbr = find { $_->{device} eq $root_part->{rootDevice} } $all_hds->{hds};
+ $mbr = fs::get::part2hd($root_part, $all_hds);
} else {
$mbr = find { !$_->{is_removable} } $all_hds->{hds};
}