summaryrefslogtreecommitdiffstats
path: root/perl-install/diskdrake/hd_gtk.pm
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2013-11-25 01:48:43 +0100
committerThierry Vignaud <thierry.vignaud@gmail.com>2013-11-25 01:48:43 +0100
commitc295f5ddc1c3f04f4856af7dc488f08ad446a646 (patch)
tree34562502173e4fcf7aff2c805bf7983e977e3c8b /perl-install/diskdrake/hd_gtk.pm
parentbd5b12f509eb7afb4e5debcf0aad85957716284a (diff)
downloaddrakx-c295f5ddc1c3f04f4856af7dc488f08ad446a646.tar
drakx-c295f5ddc1c3f04f4856af7dc488f08ad446a646.tar.gz
drakx-c295f5ddc1c3f04f4856af7dc488f08ad446a646.tar.bz2
drakx-c295f5ddc1c3f04f4856af7dc488f08ad446a646.tar.xz
drakx-c295f5ddc1c3f04f4856af7dc488f08ad446a646.zip
fix a crash with some USB keys
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 4a67ecdbb..583df7ae2 100644
--- a/perl-install/diskdrake/hd_gtk.pm
+++ b/perl-install/diskdrake/hd_gtk.pm
@@ -342,7 +342,7 @@ sub create_buttons4partitions {
my $p = find { $entry->{dm_name} eq $_->{dmcrypt_name} } @{$all_hds->{dmcrypts}};
$entry = $p if $p;
}
- my $info = $entry->{mntpoint} || $entry->{device_LABEL};
+ my $info = $entry->{mntpoint} || $entry->{device_LABEL} || '';
$info .= "\n" . ($entry->{size} ? formatXiB($entry->{size}, 512) : N("Unknown")) if $info;
my $w = Gtk3::ToggleButton->new_with_label($info) or internal_error('new_with_label');
$w->signal_connect(clicked => sub {