diff options
| author | Till Kamppeter <tkamppeter@mandriva.com> | 2001-09-15 15:12:22 +0000 |
|---|---|---|
| committer | Till Kamppeter <tkamppeter@mandriva.com> | 2001-09-15 15:12:22 +0000 |
| commit | 072baf9e9d72ed10a3b7cbfe144256b5ec982c52 (patch) | |
| tree | 9b2463b0d19b80030dfd7979c2fe10e6d2b002c8 /perl-install/printerdrake.pm | |
| parent | ad358d232637731e6a23cc723e7e9e1d57cf6306 (diff) | |
| download | drakx-072baf9e9d72ed10a3b7cbfe144256b5ec982c52.tar drakx-072baf9e9d72ed10a3b7cbfe144256b5ec982c52.tar.gz drakx-072baf9e9d72ed10a3b7cbfe144256b5ec982c52.tar.bz2 drakx-072baf9e9d72ed10a3b7cbfe144256b5ec982c52.tar.xz drakx-072baf9e9d72ed10a3b7cbfe144256b5ec982c52.zip | |
Save default spooler at program start, fixed typos in comments.
Diffstat (limited to 'perl-install/printerdrake.pm')
| -rw-r--r-- | perl-install/printerdrake.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm index 4a73c86c6..961fd4023 100644 --- a/perl-install/printerdrake.pm +++ b/perl-install/printerdrake.pm @@ -1475,7 +1475,7 @@ sub install_spooler { printer::restart_service("lpd"); # Should it be started at boot time? start_spooler_on_boot($printer, $in, "lpd"); - # Set the LPD tools as defaults for "lpr", "lpq", "lprm", ... + # Set the LPRng tools as defaults for "lpr", "lpq", "lprm", ... printer::set_alternative("lpr","/usr/bin/lpr-lpd"); printer::set_alternative("lpq","/usr/bin/lpq-lpd"); printer::set_alternative("lprm","/usr/bin/lprm-lpd"); @@ -1491,7 +1491,7 @@ sub install_spooler { } # PDQ has no daemon, so nothing needs to be started - # Set the LPD tools as defaults for "lpr", "lpq", "lprm", ... + # Set the PDQ tools as defaults for "lpr", "lpq", "lprm", ... printer::set_alternative("lpr","/usr/bin/lpr-pdq"); printer::set_alternative("lpq","/usr/bin/lpq-foomatic"); printer::set_alternative("lprm","/usr/bin/lprm-foomatic"); @@ -1576,9 +1576,10 @@ sub main { } - # If we have chosen a spooler, install it. + # If we have chosen a spooler, install it and mark it as the default. if (($printer->{SPOOLER}) && ($printer->{SPOOLER} ne '')) { if (!install_spooler($printer, $in)) {return;} + printer::set_default_spooler($printer); } # Control variables for the main loop |