From ec88df0a7b7659d4c096a4c5540b28db816d7205 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 22 Jul 2002 21:23:57 +0000
Subject: when $::noauto, hardwire no probing in detect_devices::probeall to
 ensure no probing is never done

---
 perl-install/any.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/any.pm')

diff --git a/perl-install/any.pm b/perl-install/any.pm
index e28084f4e..0f472748c 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -641,7 +641,7 @@ sub load_category {
     my ($in, $category, $auto, $at_least_one) = @_;
 
     my @l;
-    if (!$::noauto) {
+    {
 	my $w;
 	my $wait_message = sub { $w = wait_load_module($in, $category, @_) };
 	@l = modules::load_category($category, $wait_message);
-- 
cgit v1.2.1