summaryrefslogtreecommitdiffstats
path: root/perl-install/printer/printerdrake.pm
diff options
context:
space:
mode:
authorTill Kamppeter <tkamppeter@mandriva.com>2004-03-09 15:28:26 +0000
committerTill Kamppeter <tkamppeter@mandriva.com>2004-03-09 15:28:26 +0000
commit32f73df73b3aa97159d5f2b197707263f34d6b3c (patch)
tree4a0a8941d5051b560b9dc35675953c7b9d90fe26 /perl-install/printer/printerdrake.pm
parentd5905f762ece1a9966c6b3493af2f49fbe9224e5 (diff)
downloaddrakx-32f73df73b3aa97159d5f2b197707263f34d6b3c.tar
drakx-32f73df73b3aa97159d5f2b197707263f34d6b3c.tar.gz
drakx-32f73df73b3aa97159d5f2b197707263f34d6b3c.tar.bz2
drakx-32f73df73b3aa97159d5f2b197707263f34d6b3c.tar.xz
drakx-32f73df73b3aa97159d5f2b197707263f34d6b3c.zip
Made more clear choices in the first-time dialog of printerdrake.
Diffstat (limited to 'perl-install/printer/printerdrake.pm')
-rw-r--r--perl-install/printer/printerdrake.pm8
1 files changed, 7 insertions, 1 deletions
diff --git a/perl-install/printer/printerdrake.pm b/perl-install/printer/printerdrake.pm
index d1944400d..a52683b30 100644
--- a/perl-install/printer/printerdrake.pm
+++ b/perl-install/printer/printerdrake.pm
@@ -603,7 +603,13 @@ sub first_time_dialog {
undef $w;
# Show dialog
- return $in->ask_yesorno(N("Printerdrake"), $dialogtext, 0);
+
+ my $do_it = N("Yes");
+ my $quit = N("Quit");
+ my @choices = ($do_it, $quit);
+ my $choice = $in->ask_from_list(N("Printerdrake"), $dialogtext,
+ \@choices, $quit);
+ return ($choice eq $do_it);
}
sub configure_new_printers {