summaryrefslogtreecommitdiffstats
path: root/perl-install/devices.pm
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2015-03-27 10:26:58 -0400
committerThomas Backlund <tmb@mageia.org>2015-03-27 22:33:07 +0159
commit839024ea72b1828ceed72316f661cf3cbfad0f7d (patch)
treeaa04df0c0f435e9a8f48c157a8e4114c0a3b0ea1 /perl-install/devices.pm
parent281d55f77a148cb8fafd4e73912c31e06d81acf4 (diff)
downloaddrakx-839024ea72b1828ceed72316f661cf3cbfad0f7d.tar
drakx-839024ea72b1828ceed72316f661cf3cbfad0f7d.tar.gz
drakx-839024ea72b1828ceed72316f661cf3cbfad0f7d.tar.bz2
drakx-839024ea72b1828ceed72316f661cf3cbfad0f7d.tar.xz
drakx-839024ea72b1828ceed72316f661cf3cbfad0f7d.zip
fix creating RAID devices (mga#15400)
regression fixed by reverting a line from commit 329701ba075af74ae6d7f857f62c35c942c24486
Diffstat (limited to 'perl-install/devices.pm')
-rw-r--r--perl-install/devices.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/devices.pm b/perl-install/devices.pm
index a4c9a7f62..1dede1cc1 100644
--- a/perl-install/devices.pm
+++ b/perl-install/devices.pm
@@ -80,6 +80,7 @@ sub entry {
$minor = 16 * $3 + ($4 || 0);
} elsif (my ($prefix, $nb) = /(.*?)(\d+)$/) {
my $f = ${{
+ "md" => sub { c::S_IFBLK(), 9, 0 },
"ubd/" => sub { c::S_IFBLK(), 98, 0 },
}}{$prefix};
if ($f) {