summaryrefslogtreecommitdiffstats
path: root/perl-install/detect_devices.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-01-25 18:29:46 +0000
committerThierry Vignaud <tv@mageia.org>2012-01-25 18:29:46 +0000
commit1bae5e305ebd6bfa438ea16e00dd06d392b5df20 (patch)
treeb03576c9bda2886e0658f91f9ef95d4b139a610a /perl-install/detect_devices.pm
parente395c18057f9f7ee85ef8921c66814c08d8b196f (diff)
downloaddrakx-backup-do-not-use-1bae5e305ebd6bfa438ea16e00dd06d392b5df20.tar
drakx-backup-do-not-use-1bae5e305ebd6bfa438ea16e00dd06d392b5df20.tar.gz
drakx-backup-do-not-use-1bae5e305ebd6bfa438ea16e00dd06d392b5df20.tar.bz2
drakx-backup-do-not-use-1bae5e305ebd6bfa438ea16e00dd06d392b5df20.tar.xz
drakx-backup-do-not-use-1bae5e305ebd6bfa438ea16e00dd06d392b5df20.zip
(dmi_probe) use state keyword
Diffstat (limited to 'perl-install/detect_devices.pm')
-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 ad875b352..bc0584bd0 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -964,8 +964,8 @@ sub pcmcia_probe() {
} all($dev_dir);
}
-my $dmi_probe;
sub dmi_probe() {
+ state $dmi_probe;
if (arch() !~ /86/) {
return [];
}