diff options
Diffstat (limited to 'perl-install/cpufreq.pm')
-rw-r--r-- | perl-install/cpufreq.pm | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/perl-install/cpufreq.pm b/perl-install/cpufreq.pm index a55e7b766..fe4e6431e 100644 --- a/perl-install/cpufreq.pm +++ b/perl-install/cpufreq.pm @@ -43,8 +43,7 @@ sub probe_acpi_cpufreq() { get_vendor($_) eq "Intel" && $_->{'cpu family'} == 6 && ( - has_flag($_, 'est') && member($_->{model}, 13, 15) - || + has_flag($_, 'est') || $_->{model} == 11 ); } get_cpus(); @@ -54,8 +53,11 @@ sub probe_centrino() { any { get_vendor($_) eq "Intel" && has_flag($_, 'est') && ( - $_->{'cpu family'} == 6 && member($_->{model}, 9, 14) || - $_->{'cpu family'} == 15 && member($_->{model}, 3, 4) + ($_->{'cpu family'} == 6 && $_->{model} == 9 && $_->{stepping} == 5 && + $_->{'model name'} =~ /^Intel\(R\) Pentium\(R\) M processor ( 900|1[0-7]00)MHz$/) || + ($_->{'cpu family'} == 6 && $_->{model} == 13 && member($_->{stepping}, 1, 2, 6)) || + ($_->{'cpu family'} == 15 && $_->{model} == 3 && $_->{stepping} == 4) || + ($_->{'cpu family'} == 15 && $_->{model} == 4 && $_->{stepping} == 1) ); } get_cpus(); } @@ -126,10 +128,10 @@ sub probe_longrun() { } my @modules = ( - [ "acpi-cpufreq", \&probe_acpi_cpufreq ], # probe centrino first, it will get detected on ICH chipset and # speedstep-ich doesn't work with it [ "speedstep-centrino", \&probe_centrino ], + [ "acpi-cpufreq", \&probe_acpi_cpufreq ], # try to find cpufreq compliant northbridge [ "speedstep-ich", \&probe_ich ], [ "speedstep-smi", \&probe_smi ], |