do not display 2 decades old CPU bugs

2 files changed, 2 insertions, 12 deletions

diff --git a/perl-install/NEWS b/perl-install/NEWS
index e272893e3..d1f294c51 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,5 +1,7 @@
 - run_program:
   use home and logname of user we are dropping privileges to, not 501
+- harddrake:
+  o do not display 2 decades old CPU bugs
 
 Version 13.11 - 10 February 2010
 
diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2
index bbdf8a7d3..9b9bc3fa7 100755
--- a/perl-install/standalone/harddrake2
+++ b/perl-install/standalone/harddrake2
@@ -71,20 +71,10 @@ my %fields =
      {
       "bogomips" => [ N("Bogomips"), N("the GNU/Linux kernel needs to run a calculation loop at boot time to initialize a timer counter.  Its result is stored as bogomips as a way to \"benchmark\" the cpu.") ],
       "cache size" => [ N("Cache size"), N("size of the (second level) cpu cache") ],
-      "coma_bug" => [
-                     #-PO: here "comas" is the medical coma, not the lexical coma!!
-                     N("Coma bug"), N("whether this cpu has the Cyrix 6x86 Coma bug") ],
       "cpu family" => [ N("Cpuid family"), N("family of the cpu (eg: 6 for i686 class)") ],
       "cpuid level" => [ N("Cpuid level"), N("information level that can be obtained through the cpuid instruction") ],
       "cpu MHz" => [ N("Frequency (MHz)"), N("the CPU frequency in MHz (Megahertz which in first approximation may be coarsely assimilated to number of instructions the cpu is able to execute per second)") ],
       "flags" => [ N("Flags"), N("CPU flags reported by the kernel") ],
-      "fdiv_bug" => [ N("Fdiv bug"), 
-                      N("Early Intel Pentium chips manufactured have a bug in their floating point processor which did not achieve the required precision when performing a Floating point DIVision (FDIV)") ],
-      "fpu" => [ N("Is FPU present"), N("yes means the processor has an arithmetic coprocessor") ],
-      "fpu_exception" => [ N("Whether the FPU has an irq vector"), N("yes means the arithmetic coprocessor has an exception vector attached") ],
-      "f00f_bug" => [ N("F00f bug"), N("early pentiums were buggy and freezed when decoding the F00F bytecode") ],
-      "hlt_bug" => [ N("Halt bug"), 
-                     N("Some of the early i486DX-100 chips cannot reliably return to operating mode after the \"halt\" instruction is used") ],
       "level" => [ N("Level"), N("sub generation of the cpu") ],
       "model" => [ N("Model"), N("generation of the cpu (eg: 8 for Pentium III, ...)") ],
       "model name" => [ N("Model name"), N("official vendor name of the cpu") ],
@@ -144,8 +134,6 @@ my %groups = (
               {
                $identification => [ qw(processor vendor_id), "model name", "cpu family", qw(model level stepping) ],
                N("Performances") => [ "cpu MHz", "cache size", "bogomips" ],
-               N("Bugs") => [ qw(fdiv_bug coma_bug f00f_bug hlt_bug) ],
-               N("FPU")  => [ qw(fpu fpu_exception) ],
               },
               HARDDISK =>
               {