From 33280055c72fd53c4f85db213d7415ca0a064a7e Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 23 Aug 1999 21:01:21 +0000
Subject: no_comment

---
 perl-install/install_steps_interactive.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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

diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 8f640d649..766220388 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -65,7 +65,7 @@ sub selectInstallClass($@) {
 }
 
 sub setupSCSI {
-    my ($o) = @_;
+    my ($o, $auto) = @_;
     my $w;
     my @l = modules::load_thiskind('scsi', sub { 
         $w = $o->wait_message('', 
@@ -75,7 +75,7 @@ sub setupSCSI {
     });
     undef $w; # kill wait_message
 
-    $o->default("autoSCSI") and return;
+    return if $auto;
     while (1) {
 	@l ?
 	  $o->ask_yesorno('', 
-- 
cgit v1.2.1