diff options
| -rw-r--r-- | perl-install/install_steps_gtk.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 81b3ceca5..7db242598 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -141,7 +141,7 @@ sub new($$) { install_gtk::create_steps_window($o); $ugtk2::grab = 1; - $ugtk2::force_center_at_pos = [ $::rootwidth - $::windowwidth, $::logoheight, $::windowwidth, $::windowheight ]; +# $ugtk2::force_center_at_pos = [ $::rootwidth - $::windowwidth, $::logoheight, $::windowwidth, $::windowheight ]; $o = (bless {}, ref($type) || $type)->SUPER::new($o); $o->interactive::gtk::new; @@ -154,7 +154,6 @@ sub enteringStep { printf "Entering step `%s'\n", $o->{steps}{$step}{text}; $o->SUPER::enteringStep($step); install_gtk::update_steps_position($o); -# install_gtk::create_help_window($o); #- HACK: without this it does not work (reaches step doPartitionDisks then fail) } sub leavingStep { my ($o, $step) = @_; |