summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-11-25 10:56:08 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-11-25 10:56:08 +0000
commit09ce39100a56325604e7d3945a4ed47ce88ef167 (patch)
treef2b462184d0a9e4165d39900521a4a0a957e4b88 /perl-install
parent9c3578ec5f22d2c25e8abd10308a32a51362e6b8 (diff)
downloaddrakx-09ce39100a56325604e7d3945a4ed47ce88ef167.tar
drakx-09ce39100a56325604e7d3945a4ed47ce88ef167.tar.gz
drakx-09ce39100a56325604e7d3945a4ed47ce88ef167.tar.bz2
drakx-09ce39100a56325604e7d3945a4ed47ce88ef167.tar.xz
drakx-09ce39100a56325604e7d3945a4ed47ce88ef167.zip
fix destroying HorizSync & VertRefresh (especially when coming from ddcxinfos
with unknown EISA_ID)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/Xconfig/monitor.pm7
1 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/Xconfig/monitor.pm b/perl-install/Xconfig/monitor.pm
index 27475c0d1..520b6f1e4 100644
--- a/perl-install/Xconfig/monitor.pm
+++ b/perl-install/Xconfig/monitor.pm
@@ -54,8 +54,11 @@ sub configure_auto_install {
my ($raw_X, $old_X) = @_;
my $old_monitor = $old_X->{monitor} || {};
- $old_monitor->{VertRefresh} ||= $old_monitor->{vsyncrange};
- $old_monitor->{HorizSync} ||= $old_monitor->{hsyncrange};
+ my %rename = (vsyncrange => 'VertRefresh', hsyncrange => 'HorizSync');
+ foreach (keys %rename) {
+ my $v = $old_monitor->{$_} or next;
+ $old_monitor->{$rename{$_}} = $v;
+ }
my $monitor = from_raw_X($raw_X);
put_in_hash($monitor, $old_monitor);