diff options
Diffstat (limited to 'perl-install/standalone/drakups')
| -rwxr-xr-x | perl-install/standalone/drakups | 19 |
1 files changed, 1 insertions, 18 deletions
diff --git a/perl-install/standalone/drakups b/perl-install/standalone/drakups index 169564cd3..7a264b32f 100755 --- a/perl-install/standalone/drakups +++ b/perl-install/standalone/drakups @@ -177,23 +177,6 @@ sub load_access_conf() { #------------------------------------------------------------------ # misc gui data -my $help = N("Help"); -my @menu_items = - ( - [ N("/_File"), undef, undef, undef, '<Branch>' ], - [ N("/_File").N("/_Quit"), N("<control>Q"), \&quit_global, undef, '<StockItem>', 'gtk-quit' ], - [ $help, undef, undef, undef, '<Branch>' ], - [ $help.N("/_Help"), undef, sub { unless (fork()) { exec("drakhelp --id harddrake") } }, undef, '<Item>' ], - [ $help.N("/_Report Bug"), undef, sub { unless (fork()) { exec("drakbug --report drakups &") } }, undef, '<Item>' ], - [ $help.N("/_About..."), undef, sub { - create_dialog(N("About DrakUPS"), -#-PO Do not alter the <span ..> and </span> tags - N("This is DrakUPS, a Mandrake configuration tool for UPS devices.\n -Author:</span> Thierry Vignaud <tvignaud\@mandrakesoft.com>\n\n")) - }, undef, '<Item>' - ] - ); - sub edit_row { my ($model, $iter) = @_; # create new item if needed (that is when adding a new one) at end of list @@ -391,6 +374,6 @@ foreach my $i (@pages) { #------------------------------------------------------------------ # let's start the show: -$in->do_pkgs->ensure_is_installed('nut-server', '/usr/sbin/upsd'); +$in->do_pkgs->ensure_is_installed('nut-server', '/usr/sbin/upsd') if !$::testing; $w->{rwindow}->show_all; $w->main; |