diff options
Diffstat (limited to 'perl-install/printer.pm')
| -rw-r--r-- | perl-install/printer.pm | 8 |
1 files changed, 4 insertions, 4 deletions
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}; |