From d9cde2cf3e75bcc65721f8d596194bdaf9816afc Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 29 Aug 2008 14:55:24 +0000 Subject: (ask_browse_tree_info) use new installer style for Help button --- perl-install/ugtk2.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 0dd1c2bda..65833d585 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -941,7 +941,7 @@ sub ask_browse_tree_info { } @l; @buttons = reverse @buttons if !$::isInstall; - gtkpack__($box2, gtknew('Button', text => N("Help"), clicked => sub { + gtkpack__($box2, gtknew(($::isInstall ? 'Install_Button' : 'Button'), text => N("Help"), clicked => sub { ask_warn(N("Help"), $common->{interactive_help}->()); })) if $common->{interactive_help}; -- cgit v1.2.1