diff options
| author | Francois Pons <fpons@mandriva.com> | 2000-09-05 17:52:41 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2000-09-05 17:52:41 +0000 |
| commit | ef22f0025543eefd769df4e8fa5a35d665998eb2 (patch) | |
| tree | 56b5c4ce2a360b84cf5232f29c295062c6f3ca96 /perl-install | |
| parent | d64b6f87d1421b55779b24944c40b7e5df519b73 (diff) | |
| download | drakx-ef22f0025543eefd769df4e8fa5a35d665998eb2.tar drakx-ef22f0025543eefd769df4e8fa5a35d665998eb2.tar.gz drakx-ef22f0025543eefd769df4e8fa5a35d665998eb2.tar.bz2 drakx-ef22f0025543eefd769df4e8fa5a35d665998eb2.tar.xz drakx-ef22f0025543eefd769df4e8fa5a35d665998eb2.zip | |
*** empty log message ***
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/printer.pm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/perl-install/printer.pm b/perl-install/printer.pm index 6bb78c031..298c99192 100644 --- a/perl-install/printer.pm +++ b/perl-install/printer.pm @@ -377,8 +377,6 @@ sub poll_ppd_base { scalar(keys %descr_to_ppd) > 5 and last; sleep 1; #- we have to try again running the program, wait here a little before. } - #- just in case, poll_ppd_base may produce core if not connected immediately. - unlink "$prefix/core"; scalar(keys %descr_to_ppd) > 5 or die "unable to connect to cups server"; } @@ -600,7 +598,7 @@ sub remove_queue($) { require run_program; run_program::rooted($prefix, "lpadmin", "-x", $printer->{QUEUE}); } - delete $printer->{configured}{$printer->{queue}}; + delete $printer->{configured}{$printer->{QUEUE}}; } sub restart_queue($) { |