summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/ChangeLog6
-rw-r--r--perl-install/Xconfigurator.pm2
-rw-r--r--perl-install/install_steps.pm2
3 files changed, 9 insertions, 1 deletions
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 <fpons@mandrakesoft.com>
+
+ * 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 <pixel@mandrakesoft.com>
* 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});