488 |
$loadFeature->Add("genomeIn"); |
$loadFeature->Add("genomeIn"); |
489 |
# Get the feature list for this genome. |
# Get the feature list for this genome. |
490 |
my $features = $fig->all_features_detailed($genomeID); |
my $features = $fig->all_features_detailed($genomeID); |
491 |
|
my $count = scalar @{$features}; |
492 |
|
Trace("$count features found for genome $genomeID.") if T(3); |
493 |
# Loop through the features. |
# Loop through the features. |
494 |
for my $featureData (@{$features}) { |
for my $featureData (@{$features}) { |
495 |
$loadFeature->Add("featureIn"); |
$loadFeature->Add("featureIn"); |