[Bio] / Sprout / Sprout.pm Repository:
ViewVC logotype

Diff of /Sprout/Sprout.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.94, Fri Nov 3 00:42:25 2006 UTC revision 1.95, Wed Nov 29 20:31:32 2006 UTC
# Line 3488  Line 3488 
3488      # Get the parameters.      # Get the parameters.
3489      my ($self, $genomeID, $testFlag) = @_;      my ($self, $genomeID, $testFlag) = @_;
3490      # Perform the delete for the genome's features.      # Perform the delete for the genome's features.
3491      my $retVal = $self->Delete('Feature', "fig|$genomeID.%", $testFlag);      my $retVal = $self->Delete('Feature', "fig|$genomeID.%", testMode => $testFlag);
3492      # Perform the delete for the primary genome data.      # Perform the delete for the primary genome data.
3493      my $stats = $self->Delete('Genome', $genomeID, $testFlag);      my $stats = $self->Delete('Genome', $genomeID, testMode => $testFlag);
3494      $retVal->Accumulate($stats);      $retVal->Accumulate($stats);
3495      # Return the result.      # Return the result.
3496      return $retVal;      return $retVal;

Legend:
Removed from v.1.94  
changed lines
  Added in v.1.95

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3