3 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index 3aba9de4a..d502de4b7 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -3,6 +3,7 @@
   o write mdadm.conf when it is modified (#32360)
     (a nicer fix would be to write it when needed, not so soon, but it's harder)
   o change the legend and the colors per partition
+  o fix action "Type" on a software raid (eg: dm0)
 
 Version 10.4.172 - 21 August 2007, by Olivier "blino" Blin
 
diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm
index 984b32c2b..64a2b9a48 100644
--- a/perl-install/diskdrake/hd_gtk.pm
+++ b/perl-install/diskdrake/hd_gtk.pm
@@ -339,7 +339,7 @@ sub current_part() {
 
 sub kind2hd {
     my ($kind) = @_;
-    $kind->{type} =~ /hd|lvm/ ? $kind->{val} : {};
+    $kind->{type} =~ /hd|lvm/ ? $kind->{val} : bless({}, 'partition_table::raw');
 }
 
 sub hd2kind {
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 54042146d..687d127bc 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,5 +1,7 @@
 - fix loading linux software raid (mdadm) kernel modules
   (after rename raid5&raid6 -> raid456)
+- diskdrake
+  o fix action "Type" on a software raid (eg: dm0)
 
 Version 10.4.179 - 24 August 2007, by Thierry Vignaud