summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorTill Kamppeter <tkamppeter@mandriva.com>2001-09-15 15:12:22 +0000
committerTill Kamppeter <tkamppeter@mandriva.com>2001-09-15 15:12:22 +0000
commit072baf9e9d72ed10a3b7cbfe144256b5ec982c52 (patch)
tree9b2463b0d19b80030dfd7979c2fe10e6d2b002c8 /perl-install
parentad358d232637731e6a23cc723e7e9e1d57cf6306 (diff)
downloaddrakx-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')
-rw-r--r--perl-install/printerdrake.pm7
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