summaryrefslogtreecommitdiffstats
path: root/perl-install/diskdrake/hd_gtk.pm
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mandriva.org>2009-03-10 10:16:36 +0000
committerPascal Terjan <pterjan@mandriva.org>2009-03-10 10:16:36 +0000
commit33f1402f943036dbdf81bf12ded852c8eba91fd9 (patch)
treeb67fde0af3eae80608651905d123ed4ec8c028c9 /perl-install/diskdrake/hd_gtk.pm
parent1f52726a133e2ede4736a9cd2a355aac242fe9e0 (diff)
downloaddrakx-33f1402f943036dbdf81bf12ded852c8eba91fd9.tar
drakx-33f1402f943036dbdf81bf12ded852c8eba91fd9.tar.gz
drakx-33f1402f943036dbdf81bf12ded852c8eba91fd9.tar.bz2
drakx-33f1402f943036dbdf81bf12ded852c8eba91fd9.tar.xz
drakx-33f1402f943036dbdf81bf12ded852c8eba91fd9.zip
diskdrake: don't crash when creating a partition in LVM with the partition type buttons (#38078)
Diffstat (limited to 'perl-install/diskdrake/hd_gtk.pm')
-rw-r--r--perl-install/diskdrake/hd_gtk.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm
index b52d3f98f..a29adca79 100644
--- a/perl-install/diskdrake/hd_gtk.pm
+++ b/perl-install/diskdrake/hd_gtk.pm
@@ -357,7 +357,7 @@ sub create_buttons4partitions {
# disks: helpers
################################################################################
sub current_hd() {
- $current_kind->{type} eq 'hd' or die 'current_hd called but $current_kind is not an hd ('.$current_kind->{type}.')';
+ $current_kind->{type} =~ /hd|lvm/ or die 'current_hd called but $current_kind is not an hd ('.$current_kind->{type}.')';
$current_kind->{val};
}
sub current_part() {