Changeset 2291 for trunk/LATMOS-Accounts
- Timestamp:
- 11/06/19 19:35:22 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/OCHelper/User.pm
r1984 r2291 7 7 use base qw(LATMOS::Accounts::Bases::OCHelper); 8 8 use LATMOS::Accounts::Utils; 9 use LATMOS::Accounts::I18N; 9 10 10 11 =head1 NAME … … 34 35 35 36 if ($info->{contents}{sn}) { 37 38 # On regarde si on objet de même nom existe: 39 if ($info->{contents}{givenName}) { 40 if (my @objs = $self->base->search_objects( 41 'user', 42 'givenName~' . $info->{contents}{givenName}, 43 'sn~' . $info->{contents}{sn} ) ) { 44 $info->{warning} = l('A user having same name already exists: %s', join(', ', @objs)); 45 } 46 } 36 47 my $login = buildLogin( 37 48 sub {
Note: See TracChangeset
for help on using the changeset viewer.