- support help system

- remove unused function

1 files changed, 4 insertions, 5 deletions

diff --git a/perl-install/standalone/drakbug b/perl-install/standalone/drakbug
index 5084e2661..00709369d 100755
--- a/perl-install/standalone/drakbug
+++ b/perl-install/standalone/drakbug
@@ -118,12 +118,15 @@ $Report_Button->signal_connect(clicked => sub { my $options = "mdkbugreport=1";
 						$options .= "&version=$r";
 						print($bugzilla_url . "?" . $options . "\n");
 						connect_bugzilla($bugzilla_url."?".$options) });
+my $help_button = new Gtk2::Button(" ".N("Help")." ");
+$help_button->signal_connect(clicked => sub { my $r = standalone::on_request_help('/usr/share/doc/HTML/index.html') });
 $hbx->pack_end($Report_Button,0,0,0);
+$hbx->pack_end($help_button,0,0,5);
 $vbx->pack_start($hbx,0,0,0);
 $window->{window}->add($vbx);
 
 $window->{window}->show_all();
-$window->main();
+$window->main;
 ugtk2->exit(0);
 
 sub update_app {
@@ -180,10 +183,6 @@ sub connect_bugzilla {
     $in->ask_warn('', N("No browser available! Please install one"));
 }
 
-sub read_app_context {
-    my ($name) = @_;
-}
-
 sub quit_global {
     ugtk2->exit(0);
 }