diff options
Diffstat (limited to 'usr/src/libpiny/lib/Piny/User.pm')
-rw-r--r-- | usr/src/libpiny/lib/Piny/User.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/usr/src/libpiny/lib/Piny/User.pm b/usr/src/libpiny/lib/Piny/User.pm index f13d03c..06226cb 100644 --- a/usr/src/libpiny/lib/Piny/User.pm +++ b/usr/src/libpiny/lib/Piny/User.pm @@ -98,7 +98,11 @@ sub all_users { while ( my @info = getpwent( ) ) { eval { - push( @ret, $class->new( uid => $info[2] ) ); + my $user = $class->new( uid => $info[2] ); + # Some forced early evaluation, so error checking happens now. + $user->username( ); + $user->email( ); + push( @ret, $user ); }; }; |