summaryrefslogtreecommitdiffstats
path: root/perl-install/detect_devices.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2011-09-07 18:04:10 +0000
committerThierry Vignaud <tv@mageia.org>2011-09-07 18:04:10 +0000
commitbbe8b9729e49501200342cf63acc1c5d71475710 (patch)
treef316440582f9a63cb483381109da95e6985a43e0 /perl-install/detect_devices.pm
parente73dab877d5fa907cee1af9b2381619f891024d8 (diff)
downloaddrakx-backup-do-not-use-bbe8b9729e49501200342cf63acc1c5d71475710.tar
drakx-backup-do-not-use-bbe8b9729e49501200342cf63acc1c5d71475710.tar.gz
drakx-backup-do-not-use-bbe8b9729e49501200342cf63acc1c5d71475710.tar.bz2
drakx-backup-do-not-use-bbe8b9729e49501200342cf63acc1c5d71475710.tar.xz
drakx-backup-do-not-use-bbe8b9729e49501200342cf63acc1c5d71475710.zip
(default_packages) merge cpufreq detection logic into
detect_devices::hasCPUFreq(), which is cleaner and enable us to install cpufreq on more cases
Diffstat (limited to 'perl-install/detect_devices.pm')
-rw-r--r--perl-install/detect_devices.pm7
1 files changed, 6 insertions, 1 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 49ed09cab..3ad459054 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -1254,7 +1254,12 @@ sub hasCPUMicrocode() {
return $hasCPUMicrocode;
}
-sub hasCPUFreq() { require cpufreq; to_bool(cpufreq::get_modules()) }
+sub hasCPUFreq() {
+ require cpufreq;
+ to_bool(cpufreq::get_modules())
+ || cat_('/proc/cpuinfo') =~ /AuthenticAMD/ && arch() =~ /x86_64/
+ || cat_('/proc/cpuinfo') =~ /model name.*Intel\(R\) Core\(TM\)2 CPU/;
+}
sub hasWacom() { find { $_->{vendor} == 0x056a || $_->{driver} =~ /wacom/ } usb_probe() }
sub hasTouchpad() { any { $_->{Synaptics} || $_->{ALPS} || $_->{Elantech} } getInputDevices() }
sub hasNumpad() { any { $_->{Numpad} } getInputDevices() }