From db579fa938e59f24bcb4a5c6f50554ac0b2f3e74 Mon Sep 17 00:00:00 2001 From: Daouda Lo Date: Wed, 2 Jul 2003 13:07:25 +0000 Subject: - cosmetics fixes --- userdrake | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/userdrake b/userdrake index 2e7fef2..8ccbb53 100755 --- a/userdrake +++ b/userdrake @@ -472,9 +472,9 @@ sub GtkEntryHidePass { $e } sub GtkEntrySized { - my $i = shift; + my ($i, $spac) = @_; my $e = Gtk2::Entry->new_with_max_length($i); - $e->set_size_request(30, 20); + $e->set_size_request($spac, 20); $e } sub BuildUui { @@ -527,9 +527,9 @@ sub Edit { 0, $us->{o}->{acheckexpire} = Gtk2::CheckButton->new(N("Enable account expiration")), 0, gtkpack__(my $h = Gtk2::HBox->new(0, 10), 0, Gtk2::Label->new(N("Account expires MM/DD/YYYY :")), - 0, map { my $s = $_->[0]; my $t = $_->[1]; - $us->{o}->{$s} = GtkEntrySized($t), - } (['expm', 2], ['expd', 2], ['expy', 4]), + 0, map { my $s = $_->[0]; my $t = $_->[1]; my $s = $_->[2]; + $us->{o}->{$s} = GtkEntrySized($t, $s), + } (['expm', 2, 25], ['expd', 2, 25], ['expy', 4, 40]), ), 0, Gtk2::HSeparator->new, 0, $us->{o}->{lockuser} = Gtk2::CheckButton->new(N("Lock User Account")) -- cgit v1.2.1