From c1c7b5d9db1523ea9e2f5e0da1aabc0ba20b7853 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Tue, 2 Nov 2004 11:03:18 +0000
Subject: display more information

---
 perl-install/harddrake/data.pm | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'perl-install/harddrake')

diff --git a/perl-install/harddrake/data.pm b/perl-install/harddrake/data.pm
index 308704b3d..43b11d1cd 100644
--- a/perl-install/harddrake/data.pm
+++ b/perl-install/harddrake/data.pm
@@ -238,6 +238,15 @@ our @tree =
       checked_on_boot => 0,
      },
 
+     {
+      class => "MEMORY",
+      string => N("Memory"),
+      icon => "memory.png",
+      configurator => "",
+      detector => sub { grep { member($_->{name}, 'Cache', 'Memory Module') } detect_devices::dmidecode() },
+      checked_on_boot => 1,
+     },
+
      {
       class => "AGP",
       string => N("AGP controllers"),
@@ -429,6 +438,9 @@ sub custom_id {
     defined($device->{device}) ? $device->{device} :
         (defined($device->{processor}) ? 
          N("cpu # ") . $device->{processor} . ": " . $device->{'model name'} :
+         $device->{"Socket Designation"} ?
+         "$device->{name} (" . $device->{"Socket Designation"} . ")" :
+         $device->{name} ? $device->{name} :
          (defined($device->{description}) ? $device->{description} : $str));
 }
 
-- 
cgit v1.2.1