summaryrefslogtreecommitdiffstats
path: root/perl-install/Xconfig/proprietary.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-07-28 22:02:39 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-07-28 22:02:39 +0000
commitee295df5670f73b285e3de0cea0fdae7d92941bd (patch)
tree1dbff785561e08dd894473b3c3b223fb1b68e081 /perl-install/Xconfig/proprietary.pm
parent70fd8ae05409bb33818da725015daf181c6e6a83 (diff)
downloaddrakx-backup-do-not-use-ee295df5670f73b285e3de0cea0fdae7d92941bd.tar
drakx-backup-do-not-use-ee295df5670f73b285e3de0cea0fdae7d92941bd.tar.gz
drakx-backup-do-not-use-ee295df5670f73b285e3de0cea0fdae7d92941bd.tar.bz2
drakx-backup-do-not-use-ee295df5670f73b285e3de0cea0fdae7d92941bd.tar.xz
drakx-backup-do-not-use-ee295df5670f73b285e3de0cea0fdae7d92941bd.zip
14 new modules, will it be enough?? :)
Diffstat (limited to 'perl-install/Xconfig/proprietary.pm')
-rw-r--r--perl-install/Xconfig/proprietary.pm32
1 files changed, 32 insertions, 0 deletions
diff --git a/perl-install/Xconfig/proprietary.pm b/perl-install/Xconfig/proprietary.pm
new file mode 100644
index 000000000..bd94aba13
--- /dev/null
+++ b/perl-install/Xconfig/proprietary.pm
@@ -0,0 +1,32 @@
+package Xconfig::proprietary; # $Id$
+
+use diagnostics;
+use strict;
+
+use common;
+
+
+sub install_matrox_hal {
+ my ($prefix) = @_;
+ my $tmpdir = "$prefix/root/tmp";
+
+ my $tar = "mgadrivers-2.0.tgz";
+ my $dir_in_tar = "mgadrivers";
+ my $dest_dir = "$prefix/usr/X11R6/lib/modules/drivers";
+
+ #- already installed
+ return if -e "$dest_dir/mga_hal_drv.o";
+
+ system("wget -O $tmpdir/$tar ftp://ftp.matrox.com/pub/mga/archive/linux/2002/$tar") if !-e "$tmpdir/$tar";
+ system("tar xzC $tmpdir -f $tmpdir/$tar");
+
+ my $src_dir = "$tmpdir/$dir_in_tar/xfree86/4.2.0/drivers";
+ foreach (all($src_dir)) {
+ my $src = "$src_dir/$_";
+ my $dest = "$dest_dir/$_";
+ rename $dest, "$dest.non_hal";
+ cp_af($src, $dest_dir);
+ }
+ rm_rf("$tmpdir/$tar");
+ rm_rf("$tmpdir/$dir_in_tar");
+}