From 507001d6ce6e3d463f80d312cce7cc54676125bb Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 28 Dec 2012 01:20:38 +0000 Subject: adapt to new help layout (mga#5634) --- perl-install/install/steps_gtk.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'perl-install/install/steps_gtk.pm') diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm index 24588cbc6..c52038fcb 100644 --- a/perl-install/install/steps_gtk.pm +++ b/perl-install/install/steps_gtk.pm @@ -313,7 +313,7 @@ sub reallyChooseDesktop { clicked => sub { interactive::gtk::display_help( $o, - { interactive_help_id => 'choosePackages#choose-graphical-env' }, $w); + { interactive_help_id => 'chooseDesktop' }, $w); }), undef, 1 ]) ])); $w->main; @@ -355,7 +355,7 @@ sub reallyChooseGroups { 0, Gtk2::HSeparator->new, 0, gtknew('HButtonBox', layout => 'edge', children_tight => [ gtknew('Install_Button', text => N("Help"), clicked => sub { - interactive::gtk::display_help($o, { interactive_help_id => 'choosePackages#choosePackagesGroups' }, $w) }), + interactive::gtk::display_help($o, { interactive_help_id => 'choosePackageGroups' }, $w) }), gtknew('Button', text => N("Unselect All"), clicked => sub { $_->set_active(0) foreach @entries }), gtknew('Button', text => N("Next"), clicked => sub { Gtk2->main_quit }), ]), @@ -512,7 +512,7 @@ sub choosePackagesTree { interactive::gtk::display_help($o, { interactive_help_id => # FIXME: missing ref to upper window: - 'choosePackages#choosePackagesTree' }, my $w) }, + 'choosePackagesTree' }, my $w) }, ok => N("Install"), cancel => N("Previous"), @@ -791,7 +791,7 @@ It will then continue from the hard disk drive and the packages will remain avai ), 0, gtknew('HButtonBox', layout => 'edge', children_tight => [ gtknew('Install_Button', text => N("Help"), clicked => sub { - interactive::gtk::display_help($o, { interactive_help_id => 'choosePackages' }, $w) }), + interactive::gtk::display_help($o, { interactive_help_id => 'choosePackagesTree' }, $w) }), gtknew('Button', text => N("Next"), clicked => sub { Gtk2->main_quit }), ]), ]), -- cgit v1.2.1