Changeset 175 for LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/User.pm
- Timestamp:
- 05/24/09 15:39:16 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/User.pm
r163 r175 5 5 use warnings; 6 6 7 use LATMOS::Accounts::Utils; 7 8 use base qw(LATMOS::Accounts::Bases::Sql::objects); 8 9 … … 67 68 sub get_field { 68 69 my ($self, $field) = @_; 69 if ($field eq 'gecos' || $field eq 'displayName') { 70 return join(' ', grep { $_ } ($self->get_c_field('givenName'), ($self->get_c_field('sn')))); 70 if ($field eq 'gecos') { 71 return to_ascii( 72 join(' ', grep { $_ } ($self->get_c_field('givenName'), ($self->get_c_field('sn')))) 73 ) || to_ascii($self->get_c_field('description')); 74 } elsif ($field eq 'displayName') { 75 return join(' ', grep { $_ } ($self->get_c_field('givenName'), ($self->get_c_field('sn')))) 76 || $self->id; 71 77 } elsif ($field =~ /^(sAMAccountName)$/) { 72 78 return $self->id,
Note: See TracChangeset
for help on using the changeset viewer.