From 5e95d5ce6508749f0780cad25e2c984040e76342 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Wed, 6 Feb 2008 14:03:04 +0000 Subject: detect systems with C7-M processor as laptop (like Belinea s.book) --- perl-install/detect_devices.pm | 2 +- perl-install/install/NEWS | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 1ba92f600..ee529c481 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -1046,7 +1046,7 @@ sub isLaptop() { matching_desc__regexp('ViRGE.MX') || matching_desc__regexp('S3.*Savage.*[IM]X') || matching_desc__regexp('Intel Corporation\|Mobile') || matching_desc__regexp('\bATI\b.*(Mobility|\bLT\b)')) - || (any { $_->{'model name'} =~ /\bmobile\b/i } getCPUs()) + || (any { $_->{'model name'} =~ /\b(mobile|C7-M)\b/i } getCPUs()) || probe_unique_name("Type") eq 'laptop' #- ipw2100/2200/3945 are Mini-PCI (Express) adapters || (any { member($_->{driver}, qw(ipw2100 ipw2200 ipw3945)) } pci_probe()); diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index fb29d90bd..3f39464bc 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,4 +1,5 @@ - add mkntfs (#37462) +- detect systems with C7-M processor as laptop (like Belinea s.book) Version 10.6.13 - 5 February 2008 -- cgit v1.2.1