summaryrefslogtreecommitdiffstats
path: root/perl-install/detect_devices.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2008-03-06 12:51:19 +0000
committerPascal Rigaux <pixel@mandriva.com>2008-03-06 12:51:19 +0000
commit5c2dacabb3f62574c0d936a118b688de8a5a1f6d (patch)
tree84641be7f59fc1068b20629c6ee7237f283438ee /perl-install/detect_devices.pm
parentf8c581d20a0d50165bae7edbc2548afae68deb40 (diff)
downloaddrakx-5c2dacabb3f62574c0d936a118b688de8a5a1f6d.tar
drakx-5c2dacabb3f62574c0d936a118b688de8a5a1f6d.tar.gz
drakx-5c2dacabb3f62574c0d936a118b688de8a5a1f6d.tar.bz2
drakx-5c2dacabb3f62574c0d936a118b688de8a5a1f6d.tar.xz
drakx-5c2dacabb3f62574c0d936a118b688de8a5a1f6d.zip
- fix partition device name for some dmraid (missing "p", cf #38363)
simplifying code, since using "p" to separate device name from partition number when device name ends with a digit is standard in the kernel $hd->{prefix} is no more always created. Only used in same special cases
Diffstat (limited to 'perl-install/detect_devices.pm')
-rw-r--r--perl-install/detect_devices.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 1f048672d..9cd990c68 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -344,7 +344,7 @@ sub getDAC960() {
#- /dev/rd/c0d0: RAID-7, Online, 17928192 blocks, Write Thru0123456790123456789012
foreach (syslog()) {
my ($device, $info) = m|/dev/(rd/.*?): (.*?),| or next;
- $idi{$device} = { info => $info, media_type => 'hd', device => $device, prefix => $device . 'p', bus => 'dac960' };
+ $idi{$device} = { info => $info, media_type => 'hd', device => $device, bus => 'dac960' };
}
values %idi;
}
@@ -353,7 +353,7 @@ sub getATARAID() {
my %l;
foreach (syslog()) {
my ($device) = m|^\s*(ataraid/d\d+):| or next;
- $l{$device} = { info => 'ATARAID block device', media_type => 'hd', device => $device, prefix => $device . 'p', bus => 'ataraid' };
+ $l{$device} = { info => 'ATARAID block device', media_type => 'hd', device => $device, bus => 'ataraid' };
log::l("ATARAID: $device");
}
values %l;