Changeset 113
- Timestamp:
- 05/16/09 15:41:17 (15 years ago)
- Location:
- LATMOS-Accounts/bin
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LATMOS-Accounts/bin/la-create
r78 r113 23 23 $labase->is_supported_object($otype) or die "$otype object unsupported\n"; 24 24 25 my @fields = $labase->list_canonical s_fields($otype, 'w');25 my @fields = $labase->list_canonical_fields($otype, 'w'); 26 26 my %attr; 27 27 -
LATMOS-Accounts/bin/la-query
r78 r113 24 24 die "Object $otype $ouid not found\n"; 25 25 }; 26 foreach ($labase->list_canonical s_fields($otype, 'r')) {26 foreach ($labase->list_canonical_fields($otype, 'r')) { 27 27 my $val = $obj->get_c_field($_); 28 28 printf(
Note: See TracChangeset
for help on using the changeset viewer.