From c2291d42ccff39452769c2c5d1e62842765dcf7b Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Fri, 17 Mar 2000 18:28:37 +0000 Subject: *** empty log message *** --- perl-install/install_steps.pm | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) (limited to 'perl-install/install_steps.pm') diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 146447a0a..5abd53cff 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -465,13 +465,19 @@ sub servicesConfig {} #------------------------------------------------------------------------------ sub printerConfig { my($o) = @_; - if ($o->{printer}{complete}) { - require printer; + if ($o->{printer}{configured}) { require pkgs; pkgs::selectPackage($o->{packages}, pkgs::packageByName($o->{packages}, 'rhs-printfilters')); $o->installPackages($o->{packages}); - printer::configure_queue($o->{printer}); + require printer; + foreach (keys %{$o->{printer}{configured} || {}}) { + log::l("configuring printer queue $_->{queue}"); + printer::copy_printer_params($_, $o->{printer}); + #- setup all configured queues, which is not the case interactively where + #- only the working queue is setup on configuration. + printer::configure_queue($o->{printer}); + } } } -- cgit v1.2.1