diff options
Diffstat (limited to 'bin')
| -rwxr-xr-x | bin/draksambashare | 42 |
1 files changed, 22 insertions, 20 deletions
diff --git a/bin/draksambashare b/bin/draksambashare index f3bd4ff..a44987a 100755 --- a/bin/draksambashare +++ b/bin/draksambashare @@ -189,26 +189,7 @@ sub get_items() { 1, '<Item>', ], [ N("/_About") . N("/_Report Bug"), undef, sub { run_program::raw({ detach => 1 }, 'drakbug', '--report', 'draksambashare') }, 1, '<Item>', ], - [ N("/_About") . N("/_About..."), undef, sub { - my $license = formatAlaTeX(translate($::license)); - $license =~ s/\n/\n\n/sg; # nicer formatting - my $w = gtknew('AboutDialog', name => N("Draksambashare"), - version => '2008', - copyright => N("Copyright (C) %s by Mandriva", '2001-2008'), - license => $license, wrap_license => 1, - comments => N("This is a simple tool to easily manage Samba configuration."), - website => 'http://www.mageia.com', - website_label => N("Mageia"), - authors => 'Antoine Ginies <aginies@mandriva.com>', - artists => 'Hélène Durosini <ln@mandriva.com>', - translator_credits => - #-PO: put here name(s) and email(s) of translator(s) (eg: "John Smith <jsmith@nowhere.com>") - N("_: Translator(s) name(s) & email(s)\n"), - transient_for => $window->{real_window}, modal => 1, position_policy => 'center-on-parent', - ); - $w->show_all; - $w->run; - }, 1, '<Item>', ], + [ N("/_About") . N("/_About..."), undef, \&about_dialog, 1, '<Item>', ], ); return @items; } @@ -217,6 +198,27 @@ sub quit_all() { ugtk3->exit; } +sub about_dialog() { + my $license = formatAlaTeX(translate($::license)); + $license =~ s/\n/\n\n/sg; # nicer formatting + my $w = gtknew('AboutDialog', name => N("Draksambashare"), + version => '2008', + copyright => N("Copyright (C) %s by Mandriva", '2001-2008'), + license => $license, wrap_license => 1, + comments => N("This is a simple tool to easily manage Samba configuration."), + website => 'http://www.mageia.com', + website_label => N("Mageia"), + authors => 'Antoine Ginies <aginies@mandriva.com>', + artists => 'Hélène Durosini <ln@mandriva.com>', + translator_credits => + #-PO: put here name(s) and email(s) of translator(s) (eg: "John Smith <jsmith@nowhere.com>") + N("_: Translator(s) name(s) & email(s)\n"), + transient_for => $window->{real_window}, modal => 1, position_policy => 'center-on-parent', + ); + $w->show_all; + $w->run; +} + sub restart_dialog() { wait_action("service smb restart"); } |