Changeset 496
- Timestamp:
- 10/05/09 12:01:18 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/User.pm
r494 r496 67 67 forward => 'forward', 68 68 aliases => 'aliases', 69 revaliases => 'revaliases', 69 70 (map { $_ => $_ } $self->_address_fields), 70 71 (map { $_ => $_ } $self->_office_address_fields), … … 81 82 otheraddress => 'otheraddress', 82 83 mainaddress => 'mainaddress', 83 revaliases => 'revaliases',84 84 postalAddress => 'postalAddress', 85 85 facsimileTelephoneNumber => 'facsimileTelephoneNumber', … … 326 326 next; 327 327 }; 328 $attr =~ /^revaliases$/ and do { 329 if ($data{$attr}) { 330 if (my $obj = $self->base-> 331 get_object('revaliases', $self->id)) { 332 if ($obj->set_c_fields('as', $data{$attr})) { 333 $res++; 334 } else { 335 $self->base->log(LA_ERR, 'Cannot set revaliases for user %s', 336 $self->id); 337 } 338 } else { 339 if ($self->base->_create_c_object( 340 'revaliases', 341 $self->id, as => $data{$attr}, 342 )) { 343 $res++; 344 } else { 345 $self->base->log(LA_ERR, 'Cannot set revaliases for user %s', 346 $self->id); 347 } 348 } 349 } else { 350 $self->base->_delete_object('revaliases', $self->id); 351 $res++; 352 } 353 next; 354 }; 328 355 grep { $attr eq $_ } (__PACKAGE__->_office_address_fields, __PACKAGE__->_address_fields()) and do { 329 356 my $fmainaddress = $self->_get_c_field('mainaddress');
Note: See TracChangeset
for help on using the changeset viewer.