summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2002-08-09 09:24:14 +0000
committerFrancois Pons <fpons@mandriva.com>2002-08-09 09:24:14 +0000
commita64e97bd3d4890ed51887dd259378fce941dfb90 (patch)
tree8c247881d048ce3fd19aa60bda19ddafe440c3d0 /perl-install
parent96fae301fed01ef141a86da8d70600a600a0151b (diff)
downloaddrakx-a64e97bd3d4890ed51887dd259378fce941dfb90.tar
drakx-a64e97bd3d4890ed51887dd259378fce941dfb90.tar.gz
drakx-a64e97bd3d4890ed51887dd259378fce941dfb90.tar.bz2
drakx-a64e97bd3d4890ed51887dd259378fce941dfb90.tar.xz
drakx-a64e97bd3d4890ed51887dd259378fce941dfb90.zip
allow cancel button even for wizard.
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/interactive.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm
index 2ba24f076..619eeb3ab 100644
--- a/perl-install/interactive.pm
+++ b/perl-install/interactive.pm
@@ -315,7 +315,7 @@ sub ask_from_normalize {
$common->{advanced_label} ||= _("Advanced");
$common->{advanced_label_close} ||= _("Basic");
$common->{$_} = [ deref($common->{$_}) ] foreach qw(messages advanced_messages);
- add2hash_($common, { ok => _("Ok"), cancel => _("Cancel") }) if !exists $common->{ok} && !$::isWizard;
+ add2hash_($common, { ok => _("Ok"), cancel => _("Cancel") }) if !exists $common->{ok}; # && !$::isWizard;
add2hash_($common->{callbacks} ||= {}, { changed => sub {}, focus_out => sub {}, complete => sub { 0 }, canceled => sub { 0 } });
}