diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-05-03 17:34:59 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-05-03 17:34:59 +0000 |
commit | b0ead5928c5b9edde049f99387de745f7d06ce7a (patch) | |
tree | 310c75ed9c4b73253baed93560a6b536ef761000 /perl-install/Xconfig/screen.pm | |
parent | 6c7e9bdbfa12bc52da5272de610ff4956e35f715 (diff) | |
download | drakx-b0ead5928c5b9edde049f99387de745f7d06ce7a.tar drakx-b0ead5928c5b9edde049f99387de745f7d06ce7a.tar.gz drakx-b0ead5928c5b9edde049f99387de745f7d06ce7a.tar.bz2 drakx-b0ead5928c5b9edde049f99387de745f7d06ce7a.tar.xz drakx-b0ead5928c5b9edde049f99387de745f7d06ce7a.zip |
XFree 3 is gone!
Diffstat (limited to 'perl-install/Xconfig/screen.pm')
-rw-r--r-- | perl-install/Xconfig/screen.pm | 25 |
1 files changed, 6 insertions, 19 deletions
diff --git a/perl-install/Xconfig/screen.pm b/perl-install/Xconfig/screen.pm index 761c5defd..89e416a4d 100644 --- a/perl-install/Xconfig/screen.pm +++ b/perl-install/Xconfig/screen.pm @@ -7,7 +7,7 @@ use common; sub configure { - my ($raw_X, $card) = @_; + my ($raw_X) = @_; my @devices = $raw_X->get_devices; my @monitors = $raw_X->get_monitors; @@ -17,25 +17,12 @@ sub configure { @monitors = $raw_X->get_monitors; } - if ($card->{server}) { - $raw_X->{xfree3}->set_screens({ Device => $devices[0]{Identifier}, Monitor => $monitors[0]{Identifier}, - Driver => $Xconfig::card::serversdriver{$card->{server}} || internal_error("bad XFree3 server $card->{server}"), - }); - } else { - @{$raw_X->{xfree3}} = (); - } - - if ($card->{Driver}) { - my @sections = mapn { - my ($device, $monitor) = @_; - { Device => $device->{Identifier}, Monitor => $monitor->{Identifier} } - } \@devices, \@monitors; - - $raw_X->{xfree4}->set_screens(@sections); - } else { - @{$raw_X->{xfree4}} = (); - } + my @sections = mapn { + my ($device, $monitor) = @_; + { Device => $device->{Identifier}, Monitor => $monitor->{Identifier} } + } \@devices, \@monitors; + $raw_X->set_screens(@sections); 1; } |