summaryrefslogtreecommitdiffstats
path: root/perl-install/diskdrake
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2013-12-09 04:25:07 +0100
committerThierry Vignaud <thierry.vignaud@gmail.com>2013-12-09 04:27:01 +0100
commit3adb60aff810f3493789cfb4db21ca5bcd4bf9c8 (patch)
tree38c72aeeac7ee2b2c4b31eb2c620be0fd7e81817 /perl-install/diskdrake
parent2faff543a970d4a3a836310dc333780efb5eb48a (diff)
downloaddrakx-3adb60aff810f3493789cfb4db21ca5bcd4bf9c8.tar
drakx-3adb60aff810f3493789cfb4db21ca5bcd4bf9c8.tar.gz
drakx-3adb60aff810f3493789cfb4db21ca5bcd4bf9c8.tar.bz2
drakx-3adb60aff810f3493789cfb4db21ca5bcd4bf9c8.tar.xz
drakx-3adb60aff810f3493789cfb4db21ca5bcd4bf9c8.zip
workaround a crash (mga#11924)
sometimes (when there's more than one disk), the notebook is realized too early and our callbacks aren't called, resulting in $done_button not being initialized
Diffstat (limited to 'perl-install/diskdrake')
-rw-r--r--perl-install/diskdrake/hd_gtk.pm6
1 files changed, 6 insertions, 0 deletions
diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm
index ed32cb225..7ad48ab82 100644
--- a/perl-install/diskdrake/hd_gtk.pm
+++ b/perl-install/diskdrake/hd_gtk.pm
@@ -115,6 +115,12 @@ sub main {
# ensure partitions bar is properly sized on first display:
$notebook_widget->signal_connect(realize => $update_all);
$w->sync;
+ # workaround for $notebook_widget being realized too early:
+ if (!$done_button) {
+ $notebook_widget->set_current_page(-1);
+ $notebook_widget->set_current_page(0);
+ $update_all->(2);
+ }
$done_button->grab_focus;
if (!$::testing) {
$in->ask_from_list_(N("Read carefully"), N("Please make a backup of your data first"),