From 85eb530400d95b52e1664737d53740126d2bc398 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 1 Aug 2011 10:48:27 +0000 Subject: (hasCPUFreq) detect machines needing cpufreq --- perl-install/detect_devices.pm | 2 ++ perl-install/install/NEWS | 1 + 2 files changed, 3 insertions(+) (limited to 'perl-install') diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index d2d6561bd..cc36dc4a7 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -1237,6 +1237,7 @@ sub matching_types() { mips_lemote => is_mips_lemote(), mips_ict => is_mips_ict(), mips_st_ls2f => is_mips_st_ls2f(), + cpufreq => hasCPUFreq(), laptop => isLaptop(), 'numpad' => hasNumpad(), 'touchpad' => hasTouchpad(), @@ -1245,6 +1246,7 @@ sub matching_types() { }; } +sub hasCPUFreq() { require cpufreq; cpufreq::get_modules() } sub hasWacom() { find { $_->{vendor} == 0x056a || $_->{driver} =~ /wacom/ } usb_probe() } sub hasTouchpad() { any { $_->{Synaptics} || $_->{ALPS} || $_->{Elantech} } getInputDevices() } sub hasNumpad() { any { $_->{Numpad} } getInputDevices() } diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 5183d67d4..1ca89a2c2 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,5 +1,6 @@ - fix bootloader entries names - detect (at least some (eg: Compaq USB numpad) (#1099) +- detect machines needing cpufreq Version 13.58 - 27 May 2011 -- cgit v1.2.1