From 7e27179101eed96340076c2c5ecd7754107b8560 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 7 Dec 2011 18:29:01 +0000 Subject: (is_netbook_nettop) fix typos detection was probably broken since introducing that function in "allow detection of low resources systems (extracted from compssUsers.pl) and netbooks/nettops" by blino on Oct 2 2008 (found by perl_checker) --- perl-install/detect_devices.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/detect_devices.pm') diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index fbe6aa27f..a7ca9644b 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -1215,8 +1215,8 @@ sub is_vmware() { sub is_netbook_nettop() { my @cpus = getCPUs(); - (any { $_->{'model name'} =~ /(\bIntel\(R\) Atom\(TM\)\B)/i } @cpus) || - (any { $_->{'model name'} =~ /(\bIntel\(R\) Celeron\(R\) M processor\b|\bVIA C7-M Processor\b|\bGeode\(TM\)\B)/i && $_->{'cpu MHz'} < 1500 } @cpus); + (any { $_->{'model name'} =~ /(\bIntel\(R\) Atom\(TM\)\b)/i } @cpus) || + (any { $_->{'model name'} =~ /(\bIntel\(R\) Celeron\(R\) M processor\b|\bVIA C7-M Processor\b|\bGeode\(TM\)\b)/i && $_->{'cpu MHz'} < 1500 } @cpus); } sub has_low_resources() { -- cgit v1.2.1