diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2000-04-14 23:59:01 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2000-04-14 23:59:01 +0000 |
commit | a4299593feb14ed8317da49980b8c06e59688aa2 (patch) | |
tree | cf2fea27a2884a3205a95d5c3042cdae91be7c66 /perl-install/Xconfigurator.pm | |
parent | 21066f8c4d8d136cca65f7138cabb25d4b4cfe8c (diff) | |
download | drakx-backup-do-not-use-a4299593feb14ed8317da49980b8c06e59688aa2.tar drakx-backup-do-not-use-a4299593feb14ed8317da49980b8c06e59688aa2.tar.gz drakx-backup-do-not-use-a4299593feb14ed8317da49980b8c06e59688aa2.tar.bz2 drakx-backup-do-not-use-a4299593feb14ed8317da49980b8c06e59688aa2.tar.xz drakx-backup-do-not-use-a4299593feb14ed8317da49980b8c06e59688aa2.zip |
no_comment
Diffstat (limited to 'perl-install/Xconfigurator.pm')
-rw-r--r-- | perl-install/Xconfigurator.pm | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index bd9cc7934..29c25ed49 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -19,16 +19,6 @@ my ($prefix, %monitors); sub getVGAMode($) { $_[0]->{card}{vga_mode} || $vgamodes{"640x480x16"}; } -sub setVirtual($) { - my $vt = ''; - local *C; - sysopen C, "/dev/console", 2 or die "failed to open /dev/console: $!"; - ioctl(C, c::VT_GETSTATE(), $vt) or die "ioctl VT_GETSTATE failed"; - ioctl(C, c::VT_ACTIVATE(), $_[0]) or die "ioctl VT_ACTIVATE failed"; - ioctl(C, c::VT_WAITACTIVE(), $_[0]) or die "ioctl VT_WAITACTIVE failed"; - unpack "S", $vt; -} - sub readCardsDB { my ($file) = @_; my ($card, %cards); |