summaryrefslogtreecommitdiffstats
path: root/perl-install/printerdrake.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/printerdrake.pm')
-rw-r--r--perl-install/printerdrake.pm13
1 files changed, 9 insertions, 4 deletions
diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm
index e735e3a78..bcb0aa0f0 100644
--- a/perl-install/printerdrake.pm
+++ b/perl-install/printerdrake.pm
@@ -273,10 +273,15 @@ sub setup_local {
$do_auto_detect = !$printer->{NOAUTODETECT};
} else {
local $::isWizard = 0;
- $do_auto_detect = $in->ask_yesorno(_("Auto-Detection of Printers"),
- _("Printerdrake is able to auto-detect your locally connected parallel and USB printers for you, but note that on some systems the auto-detection CAN FREEZE YOUR SYSTEM AND THIS CAN LEAD TO CORRUPTED FILE SYSTEMS! So do it ON YOUR OWN RISK!
-
-Do you really want to get your printers auto-detected?"), 1);
+ my $res = $in->ask_from_list_
+ (_("Auto-Detection of Printers"),
+ _("Printerdrake is able to auto-detect your locally connected parallel and USB printers for you, but note that on some systems the auto-detection CAN FREEZE YOUR SYSTEM AND THIS CAN LEAD TO CORRUPTED FILE SYSTEMS! So do it ON YOUR OWN RISK!
+
+Do you really want to get your printers auto-detected?"),
+ [_("Do auto-detection"),
+ _("Set up printer manually")],
+ _("Do auto-detection"));
+ $do_auto_detect = ($res eq _("Do auto-detection"));
}
my @parport = ();
my $menuentries = {};