From 4cadcc3088075d32740cc479035c3c744c96a2ae Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Thu, 12 Apr 2001 12:04:33 +0000
Subject: fixed ask to configure a printer.

---
 perl-install/printerdrake.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm
index a9af38b9d..d133fca5d 100644
--- a/perl-install/printerdrake.pm
+++ b/perl-install/printerdrake.pm
@@ -335,12 +335,12 @@ Does it work properly?"), 1) ? 'done' : 'change';
 }
 
 #- Program entry point for configuration with lpr or cups (stored in $mode).
-sub main($$$;$) {
-    my ($printer, $in, $install, $upNetwork) = @_;
+sub main($$$$;$) {
+    my ($printer, $in, $ask_multiple_printer, $install, $upNetwork) = @_;
     my ($queue, $continue) = ('', 1);
 
     while ($continue) {
-	if (!$::isStandalone && (!$::expert || %{$printer->{configured} || {}} == ())) {
+	if (!$ask_multiple_printer && %{$printer->{configured} || {}} == ()) {
 	    $queue = $printer->{want} || $in->ask_yesorno(_("Printer"),
 							  _("Would you like to configure a printer?"), 0) ? 'lp' : 'Done';
 	} else {
-- 
cgit v1.2.1