summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/printerdrake
diff options
context:
space:
mode:
authorTill Kamppeter <tkamppeter@mandriva.com>2001-09-07 23:40:53 +0000
committerTill Kamppeter <tkamppeter@mandriva.com>2001-09-07 23:40:53 +0000
commitc8f65071f1e2b632c25a9df9d63f5ed0a8aa93b6 (patch)
tree0b9ea3e9251aeb4afe8b1c46da7f3cc274a04051 /perl-install/standalone/printerdrake
parentfcf489afea178e84310d6927612d8b802a18ee5b (diff)
downloaddrakx-backup-do-not-use-c8f65071f1e2b632c25a9df9d63f5ed0a8aa93b6.tar
drakx-backup-do-not-use-c8f65071f1e2b632c25a9df9d63f5ed0a8aa93b6.tar.gz
drakx-backup-do-not-use-c8f65071f1e2b632c25a9df9d63f5ed0a8aa93b6.tar.bz2
drakx-backup-do-not-use-c8f65071f1e2b632c25a9df9d63f5ed0a8aa93b6.tar.xz
drakx-backup-do-not-use-c8f65071f1e2b632c25a9df9d63f5ed0a8aa93b6.zip
Data structure fitted for auto-install to work
Optimized program to be much faster Many more waiting messages Many bugfixes
Diffstat (limited to 'perl-install/standalone/printerdrake')
-rwxr-xr-xperl-install/standalone/printerdrake8
1 files changed, 6 insertions, 2 deletions
diff --git a/perl-install/standalone/printerdrake b/perl-install/standalone/printerdrake
index b8a4628a5..db95a8e51 100755
--- a/perl-install/standalone/printerdrake
+++ b/perl-install/standalone/printerdrake
@@ -39,6 +39,11 @@ $::skiptest = /-skiptest/;
$::testing = /-testing/;
my $printer;
+
+my $in = 'interactive'->vnew('su', 'printer');
+
+{
+my $w = $in->wait_message('', _("Reading printer data ..."));
# Get what was installed before
eval { $printer = printer::getinfo('') };
# Choose the spooler by command line options
@@ -53,9 +58,8 @@ eval { $printer = printer::getinfo('') };
/-pdq/ and
$printer->{mode} = 'pdq' and printer::read_configured_queues($printer);
-my $in = 'interactive'->vnew('su', 'printer');
-
-r '/etc/modules.conf' and modules::mergein_conf('/etc/modules.conf');
+}
begin:
$::isEmbedded and kill USR2, $::CCPID;