From c8f65071f1e2b632c25a9df9d63f5ed0a8aa93b6 Mon Sep 17 00:00:00 2001 From: Till Kamppeter Date: Fri, 7 Sep 2001 23:40:53 +0000 Subject: Data structure fitted for auto-install to work Optimized program to be much faster Many more waiting messages Many bugfixes --- perl-install/standalone/printerdrake | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'perl-install/standalone/printerdrake') 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; -- cgit v1.2.1