diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/printerdrake.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm index 43c075dbc..301f1d601 100644 --- a/perl-install/printerdrake.pm +++ b/perl-install/printerdrake.pm @@ -1987,7 +1987,8 @@ to get information about it or on configure_queue($printer, $in); setasdefault($printer, $in); if (print_testpages($printer, $in, $printer->{TYPE} !~ /LOCAL/ && $upNetwork)) { - $continue = ($::expert || !$::isInstall); + $continue = ($::expert || !$::isInstall || + $in->ask_yesorno('',_("Do you want to configure another printer?"))); } else { $editqueue = 1; $queue = $printer->{QUEUE}; @@ -2120,7 +2121,7 @@ What do you want to modify on this printer?", } else { $editqueue = 0; } - $continue = ($::expert || !$::isInstall); + $continue = ($editqueue || $::expert || !$::isInstall); } # Delete some variables $printer->{OLD_QUEUE} = ""; |