diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-01-25 18:29:46 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-01-25 18:29:46 +0000 |
commit | 6bc67a25a56bf577d97e5d6bb45dc93cca49df5e (patch) | |
tree | b03576c9bda2886e0658f91f9ef95d4b139a610a /perl-install | |
parent | 82f8c77cddc5f2de64996ebbb64d4a3dd7a33d1f (diff) | |
download | drakx-6bc67a25a56bf577d97e5d6bb45dc93cca49df5e.tar drakx-6bc67a25a56bf577d97e5d6bb45dc93cca49df5e.tar.gz drakx-6bc67a25a56bf577d97e5d6bb45dc93cca49df5e.tar.bz2 drakx-6bc67a25a56bf577d97e5d6bb45dc93cca49df5e.tar.xz drakx-6bc67a25a56bf577d97e5d6bb45dc93cca49df5e.zip |
(dmi_probe) use state keyword
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/detect_devices.pm | 2 |
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 []; } |