summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/detect_devices.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index d360c55cc..70977c227 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -125,7 +125,7 @@ sub getIDE() {
}
sub getCompaqSmartArray() {
- my @idi;
+ my (@idi, $f);
foreach ('array/ida', 'cciss/cciss') {
my $prefix = "/proc/driver/$_"; #- kernel 2.4 places it here