Changeset 425

Timestamp:

09/04/09 14:14:53 (15 years ago)

Author:

nanardon

Message:

• gecos field contains address and phone number (format according ​http://fr.wikipedia.org/wiki/Champ_Gecos)

File:

• LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/User.pm (modified) (1 diff)

LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/User.pm

@@ -90 +90 @@
     my ($self, $field) = @_;
     if ($field eq 'gecos') {
-        return to_ascii(
-            join(' ', grep { $_ } ($self->_get_c_field('givenName'), ($self->_get_c_field('sn'))))
-        ) || to_ascii($self->_get_c_field('description'));
+        my $gecos = sprintf("%s,%s,%s,%s",
+            join(' ', grep { $_ } 
+                    ($self->_get_c_field('givenName'),
+                    ($self->_get_c_field('sn'))))
+                || $self->_get_c_field('description'),
+            join(' ', grep { $_ } ($self->_get_c_field('l'),
+                $self->_get_c_field('physicalDeliveryOfficeName'))),
+            $self->_get_c_field('telephoneNumber'),
+            ''
+        );
+        $gecos =~ s/:/ /g;
+        return to_ascii($gecos);
     } elsif ($field eq 'displayName') {
         return join(' ', grep { $_ } ($self->_get_c_field('givenName'), ($self->_get_c_field('sn'))))