diff options
| author | Francois Pons <fpons@mandriva.com> | 2001-04-12 12:04:33 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2001-04-12 12:04:33 +0000 |
| commit | 4cadcc3088075d32740cc479035c3c744c96a2ae (patch) | |
| tree | 11d534dd415385e6479663e4f7d0c5e810bad9b3 /perl-install | |
| parent | d9b7bf292746fb16468f7630e60e61dfa62c0def (diff) | |
| download | drakx-backup-do-not-use-4cadcc3088075d32740cc479035c3c744c96a2ae.tar drakx-backup-do-not-use-4cadcc3088075d32740cc479035c3c744c96a2ae.tar.gz drakx-backup-do-not-use-4cadcc3088075d32740cc479035c3c744c96a2ae.tar.bz2 drakx-backup-do-not-use-4cadcc3088075d32740cc479035c3c744c96a2ae.tar.xz drakx-backup-do-not-use-4cadcc3088075d32740cc479035c3c744c96a2ae.zip | |
fixed ask to configure a printer.
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/printerdrake.pm | 6 |
1 files 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 { |