summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2000-09-26 16:42:57 +0000
committerFrancois Pons <fpons@mandriva.com>2000-09-26 16:42:57 +0000
commit34927221ac7695d8bbd52cd0d866024342cabb76 (patch)
tree1589b92315cc24caffa5182b6e632339ab192366 /perl-install
parent8ffa589814d87b069d3dd5e53936db69d6415713 (diff)
downloaddrakx-backup-do-not-use-34927221ac7695d8bbd52cd0d866024342cabb76.tar
drakx-backup-do-not-use-34927221ac7695d8bbd52cd0d866024342cabb76.tar.gz
drakx-backup-do-not-use-34927221ac7695d8bbd52cd0d866024342cabb76.tar.bz2
drakx-backup-do-not-use-34927221ac7695d8bbd52cd0d866024342cabb76.tar.xz
drakx-backup-do-not-use-34927221ac7695d8bbd52cd0d866024342cabb76.zip
*** empty log message ***
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/help.pm2
-rw-r--r--perl-install/printer.pm2
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/help.pm b/perl-install/help.pm
index bb58101ce..d5d3f1a99 100644
--- a/perl-install/help.pm
+++ b/perl-install/help.pm
@@ -461,7 +461,7 @@ configurePrinterLPR =>
__("You need to enter some informations here.
- * Name of queue: the print spooler uses "lp" as default printer name. So, you need have a printer named \"lp\".
+ * Name of queue: the print spooler uses \"lp\" as default printer name. So, you need have a printer named \"lp\".
If you have only one printer, you can use several names for it. You just need to separate them by a pipe
character (a \"|\"). So, if you prefer to have a more meaningful name, you have to put it first, eg: \"My printer|lp\".
The printer having \"lp\" in its name(s) will be the default printer.
diff --git a/perl-install/printer.pm b/perl-install/printer.pm
index 2688dc508..def53c7d0 100644
--- a/perl-install/printer.pm
+++ b/perl-install/printer.pm
@@ -350,7 +350,7 @@ sub get_descr_from_ppd {
my %ppd;
#- if there is no ppd, this means this is the PostScript generic filter.
- local *F; open F, "$prefix/etc/cups/ppd/$printer->{QUEUE}.ppd" or return "PostScript";
+ local *F; open F, "$prefix/etc/cups/ppd/$printer->{QUEUE}.ppd" or return "Generic PostScript";
foreach (<F>) {
/^\*([^\s:]*)\s*:\s*\"([^\"]*)\"/ and do { $ppd{$1} = $2; next };
/^\*([^\s:]*)\s*:\s*([^\s\"]*)/ and do { $ppd{$1} = $2; next };