summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/install/NEWS1
-rw-r--r--perl-install/install/steps_gtk.pm8
2 files changed, 8 insertions, 1 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 893308677..1e85b9594 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,3 +1,4 @@
+- add help button for desktop selection step
- keep soft links in HTML help directory
- handle anchors in HTML help IDs
diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm
index 4ea36123f..d7062af74 100644
--- a/perl-install/install/steps_gtk.pm
+++ b/perl-install/install/steps_gtk.pm
@@ -294,7 +294,13 @@ sub reallyChooseDesktop {
width => mygtk2::get_label_width(), label => $message . ' ' .
N("Click on images in order to see a bigger preview")),
1, gtknew('HButtonBox', children_loose => \@l),
- 0, $w->create_okcancel(N("Next"), undef),
+ 0, $w->create_okcancel(N("Next"), undef, '',
+ [ gtknew('Install_Button', text => N("Help"),
+ clicked => sub {
+ interactive::gtk::display_help(
+ $o,
+ { interactive_help_id => 'choosePackages#d4e994' }, $w);
+ }), undef, 1 ])
]));
$w->main;