diff options
-rw-r--r-- | perl-install/interactive/gtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm index b4d41edfb..2e2caf92b 100644 --- a/perl-install/interactive/gtk.pm +++ b/perl-install/interactive/gtk.pm @@ -548,7 +548,7 @@ sub ask_fromW { gtkpack_($pack, 1, $create_widgets->($always_total_size, @widgets_always), - if_($common->{ok} || $::isWizard, + if_($common->{ok} || !exists $common->{ok}, 0, $mainw->create_okcancel($common->{ok}, $common->{cancel}, '', if_(@$l2, $advanced_button)))); my $has_scroll_always = $has_scroll; my @adv = map { warp_text($_) } @{$common->{advanced_messages}}; |