diff options
author | Thierry Vignaud <tv@mandriva.org> | 2009-10-17 14:11:58 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2009-10-17 14:11:58 +0000 |
commit | 0fdb9b66a79a12c1d72f0b779a7403afc15e9936 (patch) | |
tree | abdb221fd9ec74be465b5b8a98a7617b5bdc0de3 /userdrake | |
parent | c9710633e68c94c58886708bfa86608d81769908 (diff) | |
download | userdrake-0fdb9b66a79a12c1d72f0b779a7403afc15e9936.tar userdrake-0fdb9b66a79a12c1d72f0b779a7403afc15e9936.tar.gz userdrake-0fdb9b66a79a12c1d72f0b779a7403afc15e9936.tar.bz2 userdrake-0fdb9b66a79a12c1d72f0b779a7403afc15e9936.tar.xz userdrake-0fdb9b66a79a12c1d72f0b779a7403afc15e9936.zip |
perl_checker cleanups
Diffstat (limited to 'userdrake')
-rwxr-xr-x | userdrake | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -614,7 +614,7 @@ sub CreateTree { $tree->get_selection->signal_connect( 'changed' => sub { foreach ($tbedit, $tbdel, $buttorcheck{edit}, $buttorcheck{delete}) { - $_->set_sensitive(1) + $_->set_sensitive(1); } }); my $menu_treeview = Gtk2::Menu->new; @@ -651,9 +651,9 @@ sub CreateTree { } sub GtkEntryHidePass { - my ($text) = @_; + my ($o_text) = @_; my $e = gtknew('WeaknessCheckEntry'); - $text and $e->set_text($text); + $o_text and $e->set_text($o_text); $e->set_visibility(0); $e; } @@ -666,7 +666,7 @@ sub GtkEntrySized { } sub BuildUui { - my ($extra_widget) = @_; + my ($o_extra_widget) = @_; gtkpack_(my $vbox = Gtk2::VBox->new(0, 2), 1, create_packtable({ homogeneous => 1, col_spacings => 5, row_spacings => 5 }, [ gtknew('Label_Left', text => N("Full Name:")), $us->{o}{fullname} = Gtk2::Entry->new ], @@ -674,7 +674,7 @@ sub BuildUui { [ gtknew('Label_Left', text => N("Password:")), $us->{o}{passwd} = GtkEntryHidePass() ], [ gtknew('Label_Left', text => N("Confirm Password:")), $us->{o}{confpasswd} = GtkEntryHidePass() ], [ gtknew('Label_Left', text => N("Login Shell:")), $us->{o}{shells} = Gtk2::Combo->new ], - $extra_widget, + $o_extra_widget, ) ); $us->{o}{shells}->set_popdown_strings(@{$ctx->GetUserShells}); |