- Timestamp:
- 10/01/12 15:42:02 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Objects.pm
r1134 r1181 534 534 $field, $min, $max); 535 535 my %existsid; 536 my $oldunexported = $base->unexported(1); 536 537 foreach ($base->list_objects($class->type)) { 537 538 my $obj = $base->get_object($class->type, $_) or next; … … 539 540 $existsid{$id + 0} = 1; 540 541 } 542 $base->unexported($oldunexported); 541 543 $min += 0; 542 544 $max += 0;
Note: See TracChangeset
for help on using the changeset viewer.