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.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 042a6f2ff..ba2bb9855 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -935,7 +935,11 @@ sub ask_browse_tree_info {
]));
gtkpack__($box2, gtknew(($::isInstall ? 'Install_Button' : 'Button'), text => N("Help"), clicked => sub {
+ if (defined $::o) {
+ $::o->ask_warn(N("Help"), $common->{interactive_help}->());
+ } else {
ask_warn(N("Help"), $common->{interactive_help}->());
+ }
})) if $common->{interactive_help};
#gtkpack__($box2, my $toolbar = Gtk2::Toolbar->new('horizontal', 'icons'));