summaryrefslogtreecommitdiffstats
path: root/perl-install/Xconfig/screen.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2007-04-25 10:04:32 +0000
committerPascal Rigaux <pixel@mandriva.com>2007-04-25 10:04:32 +0000
commitcac479f0e27b8d9cc8a403b494d7ef53e34f9d14 (patch)
treef52ffa06b7d930a5585aebe7710bc177027c9f82 /perl-install/Xconfig/screen.pm
parent13b5bd878d5d94bae0073e6b4d3ec808e6ae3a6f (diff)
downloaddrakx-cac479f0e27b8d9cc8a403b494d7ef53e34f9d14.tar
drakx-cac479f0e27b8d9cc8a403b494d7ef53e34f9d14.tar.gz
drakx-cac479f0e27b8d9cc8a403b494d7ef53e34f9d14.tar.bz2
drakx-cac479f0e27b8d9cc8a403b494d7ef53e34f9d14.tar.xz
drakx-cac479f0e27b8d9cc8a403b494d7ef53e34f9d14.zip
re-sync after the big svn loss
Diffstat (limited to 'perl-install/Xconfig/screen.pm')
-rw-r--r--perl-install/Xconfig/screen.pm29
1 files changed, 0 insertions, 29 deletions
diff --git a/perl-install/Xconfig/screen.pm b/perl-install/Xconfig/screen.pm
deleted file mode 100644
index e0a3ebd64..000000000
--- a/perl-install/Xconfig/screen.pm
+++ /dev/null
@@ -1,29 +0,0 @@
-package Xconfig::screen; # $Id$
-
-use diagnostics;
-use strict;
-
-use common;
-
-
-sub configure {
- my ($raw_X) = @_;
-
- my @devices = $raw_X->get_devices;
- my @monitors = $raw_X->get_monitors;
-
- if (@monitors < @devices) {
- $raw_X->set_monitors(@monitors, ({}) x (@devices - @monitors));
- @monitors = $raw_X->get_monitors;
- }
-
- my @sections = mapn {
- my ($device, $monitor) = @_;
- { Device => $device->{Identifier}, Monitor => $monitor->{Identifier} };
- } \@devices, \@monitors;
-
- $raw_X->set_screens(@sections);
- 1;
-}
-
-1;