diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-08-13 21:02:25 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-08-13 21:02:25 +0000 |
commit | 2a52ec22dfdc103b693110a82cc04a59c1a6075a (patch) | |
tree | 749035b19162e35908290ca6194b504864253f22 /perl-install | |
parent | 7e8dafb1d5172f74dd5204ab4009d7f19b6d1d5d (diff) | |
download | drakx-2a52ec22dfdc103b693110a82cc04a59c1a6075a.tar drakx-2a52ec22dfdc103b693110a82cc04a59c1a6075a.tar.gz drakx-2a52ec22dfdc103b693110a82cc04a59c1a6075a.tar.bz2 drakx-2a52ec22dfdc103b693110a82cc04a59c1a6075a.tar.xz drakx-2a52ec22dfdc103b693110a82cc04a59c1a6075a.zip |
handle the setting of 'ok' and 'cancel'
Diffstat (limited to 'perl-install')
-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}}; |