diff options
| author | Francois Pons <fpons@mandriva.com> | 2000-09-26 16:42:57 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2000-09-26 16:42:57 +0000 |
| commit | 34927221ac7695d8bbd52cd0d866024342cabb76 (patch) | |
| tree | 1589b92315cc24caffa5182b6e632339ab192366 /perl-install | |
| parent | 8ffa589814d87b069d3dd5e53936db69d6415713 (diff) | |
| download | drakx-34927221ac7695d8bbd52cd0d866024342cabb76.tar drakx-34927221ac7695d8bbd52cd0d866024342cabb76.tar.gz drakx-34927221ac7695d8bbd52cd0d866024342cabb76.tar.bz2 drakx-34927221ac7695d8bbd52cd0d866024342cabb76.tar.xz drakx-34927221ac7695d8bbd52cd0d866024342cabb76.zip | |
*** empty log message ***
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/help.pm | 2 | ||||
| -rw-r--r-- | perl-install/printer.pm | 2 |
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 }; |