summaryrefslogtreecommitdiffstats
path: root/perl-install/printerdrake.pm
diff options
context:
space:
mode:
authorTill Kamppeter <tkamppeter@mandriva.com>2002-02-19 16:52:58 +0000
committerTill Kamppeter <tkamppeter@mandriva.com>2002-02-19 16:52:58 +0000
commitb0c754d1f7614c65cf1d950f4c22056790beb66f (patch)
tree2829cb262477ac71cdb59615ddbe92c4b69267b5 /perl-install/printerdrake.pm
parent3180e14c4cdb804dc9431e84a2dd5680cf95177a (diff)
downloaddrakx-backup-do-not-use-b0c754d1f7614c65cf1d950f4c22056790beb66f.tar
drakx-backup-do-not-use-b0c754d1f7614c65cf1d950f4c22056790beb66f.tar.gz
drakx-backup-do-not-use-b0c754d1f7614c65cf1d950f4c22056790beb66f.tar.bz2
drakx-backup-do-not-use-b0c754d1f7614c65cf1d950f4c22056790beb66f.tar.xz
drakx-backup-do-not-use-b0c754d1f7614c65cf1d950f4c22056790beb66f.zip
Changed button texts of "Do you want to auto-detect?" dialog.
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 = {};