From 3e21bfebdfc17d3eadf3374c2e9ba0eb4daad79f Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 1 Mar 2002 11:47:50 +0000 Subject: add is_a_recent_computer() --- perl-install/detect_devices.pm | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 6b172f8da..73c768d5c 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -579,6 +579,11 @@ sub raidAutoStart { } } +sub is_a_recent_computer { + my ($frequence) = map { /cpu MHz\s*:\s*(.*)/ } cat_("/proc/cpuinfo"); + $frequence > 600; +} + #-###################################################################################### #- Wonderful perl :( #-###################################################################################### -- cgit v1.2.1 name='id' value='e44a107c6d3465a5f3afc9a5c243be86b341c099'/> Mageia Installer and base platform for many utilitiesThierry Vignaud [tv]
summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2016-04-01 10:21:50 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2016-04-01 10:30:51 +0200
commite44a107c6d3465a5f3afc9a5c243be86b341c099 (patch)
tree21ebd223c70f0b9c5dd18247462f37bb6ffa9ea3
parentbeb610d87e04f2a6e0dd10b43bd417480668ddc1 (diff)
downloaddrakx-e44a107c6d3465a5f3afc9a5c243be86b341c099.tar
drakx-e44a107c6d3465a5f3afc9a5c243be86b341c099.tar.gz
drakx-e44a107c6d3465a5f3afc9a5c243be86b341c099.tar.bz2
drakx-e44a107c6d3465a5f3afc9a5c243be86b341c099.tar.xz
drakx-e44a107c6d3465a5f3afc9a5c243be86b341c099.zip