Skip to content

Commit

Permalink
Fix counts in CheckLoad
Browse files Browse the repository at this point in the history
  • Loading branch information
kimrutherford committed Apr 2, 2013
1 parent 0ace1b5 commit e69359e
Showing 1 changed file with 5 additions and 5 deletions.
10 changes: 5 additions & 5 deletions lib/PomBase/Chado/CheckLoad.pm
Expand Up @@ -72,7 +72,7 @@ method check
warn "checking results ...\n"; warn "checking results ...\n";


my $rel_rs = $chado->resultset('Sequence::FeatureRelationship'); my $rel_rs = $chado->resultset('Sequence::FeatureRelationship');
should ($rel_rs->count(), 61); should ($rel_rs->count(), 57);


my $relprop_rs = $chado->resultset('Sequence::FeatureRelationshipprop'); my $relprop_rs = $chado->resultset('Sequence::FeatureRelationshipprop');
should ($relprop_rs->count(), 9); should ($relprop_rs->count(), 9);
Expand All @@ -84,7 +84,7 @@ method check
should ($phase_loc_rs->count(), 9); should ($phase_loc_rs->count(), 9);


my $feature_prop_rs = $chado->resultset('Sequence::Featureprop'); my $feature_prop_rs = $chado->resultset('Sequence::Featureprop');
should ($feature_prop_rs->count(), 23); should ($feature_prop_rs->count(), 15);


my $feature_dbxref_rs = $chado->resultset('Sequence::FeatureDbxref'); my $feature_dbxref_rs = $chado->resultset('Sequence::FeatureDbxref');
should ($feature_dbxref_rs->count(), 33); should ($feature_dbxref_rs->count(), 33);
Expand Down Expand Up @@ -139,7 +139,7 @@ method check
my $coiled_coil_cvterm = $self->get_cvterm('sequence', 'coiled_coil'); my $coiled_coil_cvterm = $self->get_cvterm('sequence', 'coiled_coil');


my @all_feature_cvterm = $chado->resultset('Sequence::FeatureCvterm')->all(); my @all_feature_cvterm = $chado->resultset('Sequence::FeatureCvterm')->all();
should(scalar(@all_feature_cvterm), 110); should(scalar(@all_feature_cvterm), 103);


my $cvterm_property_type_cv = my $cvterm_property_type_cv =
$chado->resultset('Cv::Cv')->find({ name => 'cvterm_property_type' }); $chado->resultset('Cv::Cv')->find({ name => 'cvterm_property_type' });
Expand Down Expand Up @@ -180,10 +180,10 @@ method check
} }


my @all_props = $chado->resultset('Sequence::FeatureCvtermprop')->all(); my @all_props = $chado->resultset('Sequence::FeatureCvtermprop')->all();
should(scalar(@all_props), 217); should(scalar(@all_props), 203);


my $feat_rs = $chado->resultset('Sequence::Feature'); my $feat_rs = $chado->resultset('Sequence::Feature');
should ($feat_rs->count(), 78); should ($feat_rs->count(), 74);


for my $feat (sort { $a->uniquename() cmp $b->uniquename() } $feat_rs->all()) { for my $feat (sort { $a->uniquename() cmp $b->uniquename() } $feat_rs->all()) {
# print $feat->uniquename(), " ", $feat->type()->name(), "\n"; # print $feat->uniquename(), " ", $feat->type()->name(), "\n";
Expand Down

0 comments on commit e69359e

Please sign in to comment.