From 87ef7757fd42d70f29a67c8d56a0ebb64cdf0488 Mon Sep 17 00:00:00 2001 From: Antoine Ginies Date: Fri, 26 Oct 2007 15:06:24 +0000 Subject: add an Help menu --- bin/draksambashare | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'bin/draksambashare') diff --git a/bin/draksambashare b/bin/draksambashare index a3897fc..50c4618 100755 --- a/bin/draksambashare +++ b/bin/draksambashare @@ -180,6 +180,12 @@ sub get_items() { [ N("/_Samba Server") . N("/_Restart"), undef, \&restart_dialog, 1, '', ], [ N("/_Samba Server") . N("/R_eload"), undef, \&reload_dialog, 1, '', ], + [ N("/_Help") . N("/Samba Documentation"), undef, sub { + $in->do_pkgs->ensure_is_installed('samba-doc', '/usr/share/doc/samba-doc'); + system("/usr/bin/www-browser /usr/share/doc/samba-doc/htmldocs/index.html &") + }, + 1, '', ], + [ N("/_About") . N("/_Report Bug"), undef, sub { run_program::raw({ detach => 1 }, 'drakbug', '--report', 'draksambashare') }, 1, '', ], [ N("/_About") . N("/About..."), undef, sub { my $license = formatAlaTeX(translate($::license)); -- cgit v1.2.1