From 2ae9fd6598b90404d0b01a9d82e452493efacdaa Mon Sep 17 00:00:00 2001 From: Till Kamppeter Date: Tue, 4 Sep 2001 22:44:23 +0000 Subject: Fitted to the new Foomatic version. Fixed bug of spooler change only working when language is English. --- perl-install/printer.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'perl-install/printer.pm') diff --git a/perl-install/printer.pm b/perl-install/printer.pm index 140b8442f..7e815e9b4 100644 --- a/perl-install/printer.pm +++ b/perl-install/printer.pm @@ -482,10 +482,10 @@ sub get_cups_default_printer { return undef; } -sub set_cups_default_printer { +sub set_default_printer { my $default = $_[0]; - run_program::rooted($prefix, "lpoptions", - "-d", $default) || return; + run_program::rooted($prefix, "foomatic-configure", + "-D", "-n", $default) || return; } sub read_cupsd_conf { @@ -718,7 +718,7 @@ sub configure_queue($) { sub remove_queue($$) { my ($printer) = $_[0]; my ($queue) = $_[1]; - run_program::rooted($prefix, "foomatic-configure", "-D", + run_program::rooted($prefix, "foomatic-configure", "-R", "-s", $printer->{SPOOLER}, "-n", $queue); delete $printer->{configured}{$queue}; -- cgit v1.2.1