diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-07-06 21:54:02 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-07-06 21:54:02 +0000 |
commit | 6eef70de886b7130f8e5e308778dc48f800f3dda (patch) | |
tree | 5cab6316cd8937cc148c2d18fd373fdf8af625b2 /perl-install | |
parent | 0ffcdfc094aaf66ff6d3a24b5282d221f5525842 (diff) | |
download | drakx-backup-do-not-use-6eef70de886b7130f8e5e308778dc48f800f3dda.tar drakx-backup-do-not-use-6eef70de886b7130f8e5e308778dc48f800f3dda.tar.gz drakx-backup-do-not-use-6eef70de886b7130f8e5e308778dc48f800f3dda.tar.bz2 drakx-backup-do-not-use-6eef70de886b7130f8e5e308778dc48f800f3dda.tar.xz drakx-backup-do-not-use-6eef70de886b7130f8e5e308778dc48f800f3dda.zip |
use stock items for menu too
Diffstat (limited to 'perl-install')
-rwxr-xr-x | perl-install/standalone/harddrake2 | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2 index 361f58249..80bd16fc9 100755 --- a/perl-install/standalone/harddrake2 +++ b/perl-install/standalone/harddrake2 @@ -95,7 +95,7 @@ my %menu_options = ( my @menu_items = ( [ N("/_File"), undef, undef, undef, '<Branch>' ], - [ N("/_File").N("/_Quit"), N("<control>Q"), \&quit_global, undef, '<CheckItem>' ], + [ N("/_File").N("/_Quit"), N("<control>Q"), \&quit_global, undef, '<StockItem>', 'gtk-quit' ], [ join('', @{$menu_options{PRINTERS_DETECTION}}), undef, sub { $options{PRINTERS_DETECTION} = $check_boxes{PRINTERS_DETECTION}->active }, undef, '<CheckItem>' ], [ join('', @{$menu_options{MODEMS_DETECTION}}), undef, @@ -179,8 +179,8 @@ $w->{window}->add(gtkpack_(0, Gtk2::VBox->new(0, 0), 0, $statusbar = Gtk2::Statusbar->new, if_($::isEmbedded, 0, gtkpack(create_hbox(), gtksignal_connect(Gtk2::Button->new_from_stock('gtk-preferences'), 'event' => popup_menu($opt_menu), $menubar), - gtksignal_connect(Gtk2::Button->new(N("Help")), 'event' => popup_menu($help_menu), $menubar), - gtksignal_connect(Gtk2::Button->new(N("Quit")), + gtksignal_connect(Gtk2::Button->new('gtk-help'), 'event' => popup_menu($help_menu), $menubar), + gtksignal_connect(Gtk2::Button->new_from_stock('gtk-Quit'), 'clicked' => \&quit_global), ), ) |