From 60c13854e2373c0df499112b991c4173f162ec25 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Mon, 9 Apr 2001 08:33:33 +0000 Subject: added Till patch for printer (raw queue and PostScript queue). --- perl-install/printer.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/printer.pm') diff --git a/perl-install/printer.pm b/perl-install/printer.pm index 313df7806..4006dc446 100644 --- a/perl-install/printer.pm +++ b/perl-install/printer.pm @@ -381,7 +381,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 "Generic PostScript"; + local *F; open F, "$prefix/etc/cups/ppd/$printer->{QUEUE}.ppd" or return "POSTSCRIPT|Generic PostScript printer (en)"; local $_; while () { /^\*([^\s:]*)\s*:\s*\"([^\"]*)\"/ and do { $ppd{$1} = $2; next }; @@ -417,7 +417,7 @@ sub poll_ppd_base { scalar(keys %descr_to_ppd) > 5 or die "unable to connect to cups server"; #- assume a default printer not using any ppd at all. - $descr_to_ppd{"Generic PostScript"} = ''; + $descr_to_ppd{"No driver (raw queue)"} = ''; } #-****************************************************************************** -- cgit v1.2.1