From 87ee25a82bc6b17ff1d08eb5f21a1c149dc3a28a Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 28 Sep 2004 02:25:23 +0000 Subject: - make printer::printerdrake::install_spooler() work with an optional $in - many functions now take $security (which used to be taken from $in during install) - fix some functions with empty prototype but still using a parameter - remove some unused variable - rename some $_foo vars to $foo since those vars are used - add some undef to some function calls to be minimally perl_checker compliant - perl_checker compliant optional parameters in start_spooler_on_boot(), install_spooler() --- perl-install/install_steps.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/install_steps.pm') diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index aac003eaa..689030b48 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -733,7 +733,7 @@ sub configurePrinter { eval { add2hash($o->{printer} ||= {}, printer::main::getinfo($o->{prefix})) }; #- get existing configuration. require printer::printerdrake; - printer::printerdrake::install_spooler($o->{printer}, $o); #- not interactive... + printer::printerdrake::install_spooler($o->{printer}, $o->{security}, $o->do_pkgs); foreach (values %{$o->{printer}{configured} || {}}) { log::l("configuring printer queue " . $_->{queuedata}{queue} || $_->{QUEUE}); -- cgit v1.2.1