diff options
| -rwxr-xr-x | userdrake | 16 |
1 files changed, 8 insertions, 8 deletions
@@ -214,7 +214,7 @@ sub AddUser { 0, gtkpack(Gtk2::HBox->new(1, 20), map { my $r = $_->[1]; - gtksignal_connect(Gtk2::Button->new($_->[0]), clicked => sub { + gtksignal_connect(Gtk2::Button->new_from_stock($_->[0]), clicked => sub { if (!$r) { $u{username} = $us->{o}->{login}->get_text(); $error = 0; if (!valid($u{username})) { RaiseError($us->{error}) }; @@ -271,7 +271,7 @@ sub AddUser { } } !$error and Gtk2->main_quit; $error = 0 }) - } ([ N("Cancel"), 1 ], [ N("Ok"), 0 ])), + } ([ 'gtk-cancel', 1 ], [ 'gtk-ok', 0 ])), ) ); map { $us->{o}->{$_}->set_active(1) } (qw(privategroup createhomedir)); @@ -304,11 +304,11 @@ sub ChooseGroup() { gtkpack(Gtk2::VBox->new(0,0), @radio), Gtk2::HSeparator->new, gtkpack(create_hbox(), - gtksignal_connect(Gtk2::Button->new(N("Ok")), clicked => sub { + gtksignal_connect(Gtk2::Button->new_from_stock('gtk-ok'), clicked => sub { each_index { $_->get_active and $choice = $::i } @radio; Gtk2->main_quit; }), - gtksignal_connect(Gtk2::Button->new(N("Cancel")), clicked => sub { $w->{retval} = 0; $error = 1; Gtk2->main_quit })))); + gtksignal_connect(Gtk2::Button->new_from_stock('gtk-cancel'), clicked => sub { $w->{retval} = 0; $error = 1; Gtk2->main_quit })))); $w->main; $choice; } @@ -342,7 +342,7 @@ sub AddGroup { 0, gtkpack(Gtk2::HBox->new(1, 20), map { my $r = $_->[1]; - gtksignal_connect(Gtk2::Button->new($_->[0]), clicked => sub { + gtksignal_connect(Gtk2::Button->new_from_stock($_->[0]), clicked => sub { if (!$r) { $g{groupname} = $us->{o}->{groupname}->get_text(); $error = 0; if (!valid($g{groupname})) { RaiseError($us->{error}) }; @@ -361,7 +361,7 @@ sub AddGroup { } } !$error and Gtk2->main_quit; $error = 0; }) - } ([ N("Cancel"), 1 ], [ N("Ok"), 0 ])), + } ([ 'gtk-cancel', 1 ], [ 'gtk-ok', 0 ])), ) ); $us->{o}->{gid} = Gtk2::SpinButton->new(Gtk2::Adjustment->new(500, 1, 65000, 1, 10, 10), 1, 0); @@ -735,7 +735,7 @@ sub Edit { } } !$error and Gtk2->main_quit; $error = 0; }) - } ([ N("Cancel"), 1 ], [ N("Ok"), 0 ])), + } ([ 'gtk-cancel', 1 ], [ 'gtk-ok', 0 ])), )); $tree->show; $w->{rwindow}->show_all; @@ -861,7 +861,7 @@ sub RaiseError { gtkpack_(Gtk2::VBox->new, 1, Gtk2::Label->new($_[0]), 0, Gtk2::HSeparator->new, - 0, gtksignal_connect(Gtk2::Button->new(N("Ok")), clicked => sub { Gtk2->main_quit }) + 0, gtksignal_connect(Gtk2::Button->new_from_stock('gtk-ok'), clicked => sub { Gtk2->main_quit }) ), ); $w->main |