From 50ba5cb41fe11a195f66011d11da21089be9cba9 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 8 Sep 2003 20:15:10 +0000 Subject: add help buttons --- perl-install/standalone/drakperm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'perl-install/standalone/drakperm') diff --git a/perl-install/standalone/drakperm b/perl-install/standalone/drakperm index b5d25b0fb..9627bbf0b 100755 --- a/perl-install/standalone/drakperm +++ b/perl-install/standalone/drakperm @@ -120,6 +120,9 @@ Select permissions to see/edit", $default_perm_level)), [ N("Delete"), N("Delete selected rule"), \&del_callback ], [ N("Edit"), N("Edit current rule"), \&edit_callback ])), 0, gtkpack(Gtk2::HButtonBox->new, + gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => + sub { unless (fork()) { exec("drakhelp --id drakperm") } }), + Gtk2::Label->new(""), gtksignal_connect(Gtk2::Button->new(N("Cancel")), clicked => sub { ugtk2->exit }), gtksignal_connect(Gtk2::Button->new(N("Ok")), clicked => \&save_perm), ) -- cgit v1.2.1