From 8c1ccdfa70e0c1d93fed5cf634d072708b817a87 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Thu, 6 Mar 2003 15:57:23 +0000 Subject: dropped allowNVIDIA_rpms method. --- perl-install/install_any.pm | 22 ---------------------- 1 file changed, 22 deletions(-) diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 10046bae1..66f10144c 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -185,28 +185,6 @@ sub clean_postinstall_rpms() { } -#-###################################################################################### -#- Specific Hardware to take into account and associated rpms to install -#-###################################################################################### -sub allowNVIDIA_rpms { - my ($packages) = @_; - require pkgs; - if (pkgs::packageByName($packages, "NVIDIA_GLX")) { - #- at this point, we can allow using NVIDIA 3D acceleration packages. - my @rpms; - foreach my $p (@{$packages->{depslist}}) { - my ($ext, $version, $release) = $p->name =~ /kernel[^-]*(-smp|-enterprise|-secure)?(?:-(\d.*?)\.(\d+mdk))?$/ or next; - $p->flag_available or next; - $version or ($version, $release) = ($p->version, $p->release); - my $name = "NVIDIA_kernel-$version-$release$ext"; - pkgs::packageByName($packages, $name) or next; - push @rpms, $name; - } - @rpms > 0 or return; - return [ @rpms, "NVIDIA_GLX" ]; - } -} - #-###################################################################################### #- Functions #-###################################################################################### -- cgit v1.2.1