summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorTill Kamppeter <tkamppeter@mandriva.com>2002-08-26 22:30:56 +0000
committerTill Kamppeter <tkamppeter@mandriva.com>2002-08-26 22:30:56 +0000
commit455c17603f964b81334740b551252d96a997941d (patch)
treecea7bb79adcf14c55d58979bc0274ce8f7d58d4b /perl-install/standalone
parent3aa5e2d2e2f6e04495161af0b4f01d9b139384d3 (diff)
downloaddrakx-backup-do-not-use-455c17603f964b81334740b551252d96a997941d.tar
drakx-backup-do-not-use-455c17603f964b81334740b551252d96a997941d.tar.gz
drakx-backup-do-not-use-455c17603f964b81334740b551252d96a997941d.tar.bz2
drakx-backup-do-not-use-455c17603f964b81334740b551252d96a997941d.tar.xz
drakx-backup-do-not-use-455c17603f964b81334740b551252d96a997941d.zip
- Ask user whether he really wants to set up printing when he starts Printerdrake for the first time.
- Added titles ("Printerdrake") to all wait messages.
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/printerdrake4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/standalone/printerdrake b/perl-install/standalone/printerdrake
index 4917ea8c8..cca086b3e 100755
--- a/perl-install/standalone/printerdrake
+++ b/perl-install/standalone/printerdrake
@@ -41,11 +41,13 @@ my $in = 'interactive'->vnew('su', 'printer');
my $commandline = $_;
+exit 0 if !printerdrake::first_time_dialog($printer, $in, 1);
+
{
# Check whether Foomatic is installed and install it if necessary
printerdrake::install_foomatic($in);
-my $w = $in->wait_message('', _("Reading printer data ..."));
+my $w = $in->wait_message(_("Printerdrake"), _("Reading printer data ..."));
# Get what was installed before
eval { $printer = printer::getinfo('') };
# Choose the spooler by command line options