diff options
| author | Daouda Lo <daouda@mandriva.com> | 2003-01-06 20:47:58 +0000 |
|---|---|---|
| committer | Daouda Lo <daouda@mandriva.com> | 2003-01-06 20:47:58 +0000 |
| commit | 87f63083402c7843dd93408a4692ea1fb4d95dd2 (patch) | |
| tree | 540ab10b89ed3e8764cb8f8afe3b79e241e67cb1 /perl-install/standalone/drakbug | |
| parent | 3e0c06ffc9c8e32dfeb433490f4e23b59144a48d (diff) | |
| download | drakx-backup-do-not-use-87f63083402c7843dd93408a4692ea1fb4d95dd2.tar drakx-backup-do-not-use-87f63083402c7843dd93408a4692ea1fb4d95dd2.tar.gz drakx-backup-do-not-use-87f63083402c7843dd93408a4692ea1fb4d95dd2.tar.bz2 drakx-backup-do-not-use-87f63083402c7843dd93408a4692ea1fb4d95dd2.tar.xz drakx-backup-do-not-use-87f63083402c7843dd93408a4692ea1fb4d95dd2.zip | |
- support help system
- remove unused function
Diffstat (limited to 'perl-install/standalone/drakbug')
| -rwxr-xr-x | perl-install/standalone/drakbug | 9 |
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); } |