From 40dcd0a59c0cce9b75f40b338799f5f28dd87cf6 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Mon, 7 Aug 2000 10:24:55 +0000 Subject: *** empty log message *** --- perl-install/ChangeLog | 6 ++++++ perl-install/Xconfigurator.pm | 2 +- perl-install/install_steps.pm | 2 ++ 3 files changed, 9 insertions(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/ChangeLog b/perl-install/ChangeLog index e2e37708b..721763378 100644 --- a/perl-install/ChangeLog +++ b/perl-install/ChangeLog @@ -1,3 +1,9 @@ +2000-08-07 François Pons + + * Xconfigurator.pm: added SiS6326 in the list of chipset that + needVideoRam, reported on ml. + * install_steps.pm: fixed auto install of printer. + 2000-08-06 Pixel * interactive.pm (ask_from_listf): created this GREAT function diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index bbac283d3..47bff9b69 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -44,7 +44,7 @@ sub readCardsDB { CHIPSET => sub { $card->{chipset} = $val; $card->{flags}{needChipset} = 1 if $val eq 'GeForce DDR'; - $card->{flags}{needVideoRam} = 1 if member($val, qw(mgag10 mgag200 RIVA128)); + $card->{flags}{needVideoRam} = 1 if member($val, qw(mgag10 mgag200 RIVA128 SiS6326)); }, SERVER => sub { $card->{server} = $val; }, DRIVER => sub { $card->{driver} = $val; }, diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 2b7c44417..58e15fde7 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -659,6 +659,8 @@ sub configurePrinter { $o->installPackages($o->{packages}); require printer; + eval { add2hash($o->{printer}, printer::getinfo($o->{prefix})) }; #- get existing configuration. + printer::read_printer_db(); #- load printer db, else configuration will fails. foreach (keys %{$o->{printer}{configured} || {}}) { log::l("configuring printer queue $_->{queue}"); printer::copy_printer_params($_, $o->{printer}); -- cgit v1.2.1