Changeset 1298 for trunk/LATMOS-Accounts/lib/LATMOS
- Timestamp:
- 03/23/15 14:30:10 (9 years ago)
- Location:
- trunk/LATMOS-Accounts/lib/LATMOS/Accounts
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases.pm
r1297 r1298 447 447 $data{$attribute->iname} = $cdata{$cfield}; 448 448 } 449 #keys %data or return 0; # TODO: return an error ?450 my $obj = $self-> create_object($otype, $id, %data) or return;449 $self->create_object($otype, $id, %data) or return; 450 my $obj = $self->get_object($otype, $id) or return; 451 451 $obj->ReportChange('Create', 'Object created with %s', join(', ', sort keys %cdata)); 452 452 -
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Unix.pm
r1123 r1298 366 366 }; 367 367 my $obj = $self->get_object($otype, $id) or return; 368 $obj->set_fields(%data) ;368 $obj->set_fields(%data) or return; 369 369 $obj 370 370 }
Note: See TracChangeset
for help on using the changeset viewer.