diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2005-04-28 15:51:50 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2005-04-28 15:51:50 +0000 |
| commit | 31fdcc7b2b0d02ed84853e4e21c3562f98a3f37a (patch) | |
| tree | 2891d70d830450c167dc6b399b324748d50f3d09 /perl-install/Xconfig | |
| parent | 8499bd89d807a03a9f94fe2359818e670a908514 (diff) | |
| download | drakx-backup-do-not-use-31fdcc7b2b0d02ed84853e4e21c3562f98a3f37a.tar drakx-backup-do-not-use-31fdcc7b2b0d02ed84853e4e21c3562f98a3f37a.tar.gz drakx-backup-do-not-use-31fdcc7b2b0d02ed84853e4e21c3562f98a3f37a.tar.bz2 drakx-backup-do-not-use-31fdcc7b2b0d02ed84853e4e21c3562f98a3f37a.tar.xz drakx-backup-do-not-use-31fdcc7b2b0d02ed84853e4e21c3562f98a3f37a.zip | |
if one prefer using "Modes" instead of "Virtual", keep it as is
Diffstat (limited to 'perl-install/Xconfig')
| -rw-r--r-- | perl-install/Xconfig/xfree.pm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/Xconfig/xfree.pm b/perl-install/Xconfig/xfree.pm index b05e25a5e..da6799b6a 100644 --- a/perl-install/Xconfig/xfree.pm +++ b/perl-install/Xconfig/xfree.pm @@ -152,10 +152,13 @@ sub set_resolution { foreach my $Screen ($o_Screen_ ? $o_Screen_ : $raw_X->get_Sections('Screen')) { $Screen ||= $raw_X->get_default_screen or internal_error('no screen'); + + my $Mode_name = (any { $_->{l}{Modes} } @{$Screen->{Display} || []}) ? 'Modes' : 'Virtual'; + my $Mode = sprintf($Mode_name eq 'Modes' ? '"%dx%d"' : '%d %d', @$resolution{'X', 'Y'}); - $Screen->{DefaultColorDepth} = { val => $resolution->{Depth} eq '32' ? 24 : $resolution->{Depth} }; + $Screen->{DefaultColorDepth} = { val => $resolution->{Depth} eq '32' ? 24 : $resolution->{Depth} }; $Screen->{Display} = [ map { - { l => { Depth => { val => $_ }, Virtual => { val => join(' ', @$resolution{'X', 'Y'}) } } }; + { l => { Depth => { val => $_ }, $Mode_name => { val => $Mode } } }; } 8, 15, 16, 24 ]; } add_gtf_ModeLines($raw_X, $resolution); |