summaryrefslogtreecommitdiffstats
path: root/perl-install/printerdrake.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2000-01-07 11:56:31 +0000
committerFrancois Pons <fpons@mandriva.com>2000-01-07 11:56:31 +0000
commit4b1e5a783ad0ceab4640d3e0359ed253439b5d3c (patch)
treed8085bd24171b42b06207f8c64ae8948e6e21d69 /perl-install/printerdrake.pm
parente28cc9776192f3d4bbc86bd2781106faf6d0b656 (diff)
downloaddrakx-backup-do-not-use-4b1e5a783ad0ceab4640d3e0359ed253439b5d3c.tar
drakx-backup-do-not-use-4b1e5a783ad0ceab4640d3e0359ed253439b5d3c.tar.gz
drakx-backup-do-not-use-4b1e5a783ad0ceab4640d3e0359ed253439b5d3c.tar.bz2
drakx-backup-do-not-use-4b1e5a783ad0ceab4640d3e0359ed253439b5d3c.tar.xz
drakx-backup-do-not-use-4b1e5a783ad0ceab4640d3e0359ed253439b5d3c.zip
*** empty log message ***
Diffstat (limited to 'perl-install/printerdrake.pm')
-rw-r--r--perl-install/printerdrake.pm6
1 files changed, 2 insertions, 4 deletions
diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm
index a5e1b4a8b..397f9adbd 100644
--- a/perl-install/printerdrake.pm
+++ b/perl-install/printerdrake.pm
@@ -199,9 +199,7 @@ wish to access and any applicable user name and password."),
$printer->{RESOLUTION} = "Default" unless @list_res;
$printer->{CRLF} = $db_entry{DESCR} =~ /HP/;
- $printer->{BITSPERPIXEL} = "Default" unless @list_col;
-
- $printer->{BITSPERPIXEL} = $depth_to_col{$printer->{BITSPERPIXEL}} || $printer->{BITSPERPIXEL}; #- translate.
+ $printer->{BITSPERPIXEL} = @list_col ? $depth_to_col{$printer->{BITSPERPIXEL}} || $depth_to_col{$col[0]} : "Default";
$in->ask_from_entries_refH('', _("Printer options"), [
_("Paper Size") => { val => \$printer->{PAPERSIZE}, type => 'list', , not_edit => !$::expert, list => \@printer::papersize_type },
@@ -215,7 +213,7 @@ _("Uniprint driver options") => { val => \$printer->{BITSPERPIXEL}, type => 'lis
_("Color depth options") => { val => \$printer->{BITSPERPIXEL}, type => 'list', , not_edit => !$::expert, list => \@col } ), ) : ()
]);;
- $printer->{BITSPERPIXEL} = $col_to_depth{$printer->{BITSPERPIXEL}} || $printer->{BITSPERPIXEL}; #- translate.
+ $printer->{BITSPERPIXEL} = $col_to_depth{$printer->{BITSPERPIXEL}} || $printer->{BITSPERPIXEL}; #- translate back.
$printer->{complete} = 1;
copy_printer_params($printer, $printer->{configured}{$printer->{QUEUE}} ||= {});