From f11b3b7e50d03d9cf435bc9ec7532947ee95204f Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Sat, 16 Jan 2016 09:32:13 +0100
Subject: fix crash (mga#17484)

it looks like newer gtk+ fires some signals too early
---
 perl-install/diskdrake/hd_gtk.pm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'perl-install/diskdrake/hd_gtk.pm')

diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm
index 93625e921..68295879d 100644
--- a/perl-install/diskdrake/hd_gtk.pm
+++ b/perl-install/diskdrake/hd_gtk.pm
@@ -276,6 +276,7 @@ sub per_entry_info_box {
 sub current_kind_changed {
     my ($_in, $kind) = @_;
 
+    return if !$kind->{display_box};
     $_->destroy foreach $kind->{display_box}->get_children;
     my @parts = kind2parts($kind);
     my $totalsectors = kind2sectors($kind, @parts);
-- 
cgit v1.2.1