Changeset 9322
- Timestamp:
- 2005-03-08T16:24:23+13:00 (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/classify/AZList.pm
r9204 r9322 267 267 #if there is only one entry here, we suppress the buckets 268 268 if ((scalar @tmparr) == 1) { 269 $classifyinfo->{'childtype'} = "V list";269 $classifyinfo->{'childtype'} = "VList"; 270 270 foreach my $OID (@{$classhash->{$tmparr[0]}}) { 271 271 push (@{$classifyinfo->{'contains'}}, {'OID'=>$OID});
Note:
See TracChangeset
for help on using the changeset viewer.