summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorOlivier Blin <dev@blino.org>2016-01-25 09:53:01 +0100
committerOlivier Blin <dev@blino.org>2016-01-25 09:53:01 +0100
commit2f2920cb9c63933d8e23bf1371dc975d4ea42589 (patch)
tree6c0361bd8a7caf9ec421100bb3644b0e39393601 /perl-install
parent315835e9d85577ca6486d0aae2be23740f8eac5d (diff)
downloaddrakx-2f2920cb9c63933d8e23bf1371dc975d4ea42589.tar
drakx-2f2920cb9c63933d8e23bf1371dc975d4ea42589.tar.gz
drakx-2f2920cb9c63933d8e23bf1371dc975d4ea42589.tar.bz2
drakx-2f2920cb9c63933d8e23bf1371dc975d4ea42589.tar.xz
drakx-2f2920cb9c63933d8e23bf1371dc975d4ea42589.zip
simplify detect_devices::dmi_probe
Diffstat (limited to 'perl-install')
-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 2b3ba711b..ffd7de214 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -1154,7 +1154,7 @@ Cache the result of c::dmi_probe() (aka C<dmidecode>) and return the list of ite
sub dmi_probe() {
state $dmi_probe;
if (arch() !~ /86/) {
- return ();
+ return;
}
$dmi_probe ||= $> ? [] : [ c::dmi_probe() ];
@$dmi_probe;