(dmi_probe) simplify after r690

(was: "try to parse DMI informations only on x86 to avoid
reading/writing some random memory location on arm/mips")

1 files changed, 1 insertions, 3 deletions

diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 2d3c2fd5c..ad875b352 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -967,13 +967,11 @@ sub pcmcia_probe() {
 my $dmi_probe;
 sub dmi_probe() {
     if (arch() !~ /86/) {
-        $dmi_probe ||= [];
+        return [];
     }
-    else {
     $dmi_probe ||= [ map {
 	/(.*?)\t(.*)/ && { bus => 'DMI', driver => $1, description => $2 };
     } $> ? () : c::dmi_probe() ];
-    }
     @$dmi_probe;
 }