summaryrefslogtreecommitdiffstats
path: root/perl-install/ugtk2.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/ugtk2.pm')
-rw-r--r--perl-install/ugtk2.pm10
1 files changed, 2 insertions, 8 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index ac9efc24e..5ea7fc1ee 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -935,14 +935,8 @@ sub ask_browse_tree_info {
0, my $box2 = gtknew('HBox', spacing => 10),
]));
- gtkpack__($box2, gtknew(($::isInstall ? 'Install_Button' : 'Button'), text => N("Help"), clicked => sub {
- # will be a little small in standalone mode:
- if ($::isInstall) {
- $::o->ask_warn(N("Help"), $common->{interactive_help}->());
- } else {
- ask_warn(N("Help"), $common->{interactive_help}->());
- }
- })) if $common->{interactive_help};
+ gtkpack__($box2, gtknew(($::isInstall ? 'Install_Button' : 'Button'), text => N("Help"),
+ clicked => $common->{interactive_help})) if $common->{interactive_help};
#gtkpack__($box2, my $toolbar = Gtk2::Toolbar->new('horizontal', 'icons'));
gtkpack__($box2, my $toolbar = Gtk2::Toolbar->new);