diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2006-10-09 12:22:18 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2006-10-09 12:22:18 +0000 |
| commit | b9cfdbea18a512e40ebf5d09f4c98e5f5071671a (patch) | |
| tree | 261a3f1ad46278d3bf669c6210c02f4f2323d733 | |
| parent | 5216873eb7879dcccb088424070412cfe8c7ad95 (diff) | |
| download | userdrake-b9cfdbea18a512e40ebf5d09f4c98e5f5071671a.tar userdrake-b9cfdbea18a512e40ebf5d09f4c98e5f5071671a.tar.gz userdrake-b9cfdbea18a512e40ebf5d09f4c98e5f5071671a.tar.bz2 userdrake-b9cfdbea18a512e40ebf5d09f4c98e5f5071671a.tar.xz userdrake-b9cfdbea18a512e40ebf5d09f4c98e5f5071671a.zip | |
(BuildUui, Edit) HIG somewhat first tab of add & edit dialogs
| -rwxr-xr-x | userdrake | 20 |
1 files changed, 8 insertions, 12 deletions
@@ -648,12 +648,12 @@ sub BuildUui { my ($extra_widget) = @_; gtkpack_(my $vbox = Gtk2::VBox->new(0, 2), 1, create_packtable({ homogeneous => 1, col_spacings => 5, row_spacings => 5 }, - [ N("Full Name:"), $us->{o}{fullname} = Gtk2::Entry->new ], - [ N("Login:"), $us->{o}{login} = Gtk2::Entry->new ], - [ N("Password:"), $us->{o}{passwd} = GtkEntryHidePass() ], - [ N("Confirm Password:"), $us->{o}{confpasswd} = GtkEntryHidePass() ], - [ N("Login Shell:"), $us->{o}{shells} = Gtk2::Combo->new ] - $extra_widget, + [ gtknew('Label_Left', text => N("Full Name:")), $us->{o}{fullname} = Gtk2::Entry->new ], + [ gtknew('Label_Left', text => N("Login:")), $us->{o}{login} = Gtk2::Entry->new ], + [ 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, ) ); $us->{o}{shells}->set_popdown_strings(@{$ctx->GetUserShells}); @@ -696,12 +696,8 @@ sub Edit() { if ($p <= 0) { my ($vald, $mo, $ye) = (localtime())[3, 4, 5]; my $valy = $ye+1900; my $valm = $mo+1; gtkappend_page($nbU, - gtkpack_(Gtk2::VBox->new(0, 2), - 1, BuildUui(), - 1, create_packtable({ homogeneous => 1, col_spacings => 5, row_spacings => 5 }, - [ N("Home:"), $us->{o}{homedir} = Gtk2::Entry->new ] - ) - ), gtkshow(Gtk2::Label->new(N("User Data")))); + BuildUui([ gtknew('Label_Left', text => N("Home:")), $us->{o}{homedir} = Gtk2::Entry->new ]), + gtkshow(Gtk2::Label->new(N("User Data")))); gtkappend_page($nbU, gtkpack_(Gtk2::VBox->new(0, 2), 0, $us->{o}{acheckexpire} = Gtk2::CheckButton->new(N("Enable account expiration")), |