diff options
author | Mystery Man <unknown@mandriva.org> | 2003-04-24 07:15:38 +0000 |
---|---|---|
committer | Mystery Man <unknown@mandriva.org> | 2003-04-24 07:15:38 +0000 |
commit | 87ef78ed082f9dec4e83a6120b32617b7f7a86b9 (patch) | |
tree | b96ceedd4f1c29745a0651880e71daab8cdb686c /perl-install/detect_devices.pm | |
parent | 327bd24f8e4291bd1882de1990dd7339f781a9cb (diff) | |
download | drakx-backup-do-not-use-87ef78ed082f9dec4e83a6120b32617b7f7a86b9.tar drakx-backup-do-not-use-87ef78ed082f9dec4e83a6120b32617b7f7a86b9.tar.gz drakx-backup-do-not-use-87ef78ed082f9dec4e83a6120b32617b7f7a86b9.tar.bz2 drakx-backup-do-not-use-87ef78ed082f9dec4e83a6120b32617b7f7a86b9.tar.xz drakx-backup-do-not-use-87ef78ed082f9dec4e83a6120b32617b7f7a86b9.zip |
This commit was manufactured by cvs2svn to create tag 'V1_1_9_56mdk'.V1_1_9_56mdk
Diffstat (limited to 'perl-install/detect_devices.pm')
-rw-r--r-- | perl-install/detect_devices.pm | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index c60e356c2..383844143 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -478,7 +478,15 @@ sub get_mac_generation() { return "Unknown Generation"; } -sub hasSMP { c::detectSMP() } +sub hasSMP { + # Much simpler if we have APIC/ACPI stuff + foreach (syslog()) { + my $nprocs = (m/(^Processors: (\d+)|(\d+) CPUs avail)/)[1] or next; + return $nprocs > 1 ? 1 : 0; + } + c::detectSMP() +} + sub hasPCMCIA { $::o->{pcmcia} } #- because /proc/pcmcia seems not to be present on 2.4 at least (or use /var/run/stab) #- try to detect a laptop, we assume pcmcia service is an indication of a laptop or |