summaryrefslogtreecommitdiffstats
path: root/perl-install/printer.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>1999-11-08 10:02:01 +0000
committerFrancois Pons <fpons@mandriva.com>1999-11-08 10:02:01 +0000
commit3240a98c869b07d8ac517a55f5988399b0249e75 (patch)
treeeb6eef29e64811e21735783d9c01901a38b38111 /perl-install/printer.pm
parent0f16f9693f47687136e5058916d0d04dcb611217 (diff)
downloaddrakx-3240a98c869b07d8ac517a55f5988399b0249e75.tar
drakx-3240a98c869b07d8ac517a55f5988399b0249e75.tar.gz
drakx-3240a98c869b07d8ac517a55f5988399b0249e75.tar.bz2
drakx-3240a98c869b07d8ac517a55f5988399b0249e75.tar.xz
drakx-3240a98c869b07d8ac517a55f5988399b0249e75.zip
*** empty log message ***
Diffstat (limited to 'perl-install/printer.pm')
-rw-r--r--perl-install/printer.pm13
1 files changed, 3 insertions, 10 deletions
diff --git a/perl-install/printer.pm b/perl-install/printer.pm
index abc97e526..3e8350d45 100644
--- a/perl-install/printer.pm
+++ b/perl-install/printer.pm
@@ -419,19 +419,12 @@ sub configure_queue($) {
%fieldname = ();
$fieldname{gsdevice} = $dbentry->{GSDRIVER};
$fieldname{papersize} = $entry->{PAPERSIZE} ? $entry->{PAPERSIZE} : "letter";
- $fieldname{resolution} = $entry->{RESOLUTION}; #-($entry->{RESOLUTION} eq "Default") ? "Default" : "";
+ $fieldname{resolution} = $entry->{RESOLUTION};
$fieldname{color} = $entry->{BITSPERPIXEL} ne "Default" &&
(($dbentry->{GSDRIVER} ne "uniprint" && "-dBitsPerPixel=") . $entry->{BITSPERPIXEL});
-#- do {
-#- if ($dbentry->{GSDRIVER} ne "uniprint") {
-#- ($entry->{BITSPERPIXEL} eq "Default") ? "-dBitsPerPixel=Default" : "";
-#- } else {
-#- $entry->{BITSPERPIXEL};
-#- }
-#- };
$fieldname{reversepages} = "NO";
$fieldname{extragsoptions} = "";
- $fieldname{pssendeof} = ($dbentry->{GSDRIVER} ne "POSTSCRIPT") ? "NO" : "YES";
+ $fieldname{pssendeof} = $entry->{AUTOSENDEOF} ? ($dbentry->{GSDRIVER} eq "POSTSCRIPT" ? "YES" : "NO") : "NO";
$fieldname{nup} = "1";
$fieldname{rtlftmar} = "18";
$fieldname{topbotmar} = "18";
@@ -442,7 +435,7 @@ sub configure_queue($) {
%fieldname = ();
$fieldname{textonlyoptions} = "";
$fieldname{crlftrans} = $entry->{CRLF} ? "YES" : "";
- $fieldname{textsendeof} = ($dbentry->{GSDRIVER} eq "POSTSCRIPT") ? "NO" : "YES";
+ $fieldname{textsendeof} = $entry->{AUTOSENDEOF} ? ($dbentry->{GSDRIVER} eq "POSTSCRIPT" ? "NO" : "YES") : "NO";
create_config_file($filein, $file, %fieldname);
if ($entry->{TYPE} eq "SMB") {