From 2b6a87aabd66bfb1a99948f0fef5e74989b5aea2 Mon Sep 17 00:00:00 2001
From: Magali Ruffier <mr6@ebi.ac.uk>
Date: Wed, 2 Oct 2013 15:57:26 +0000
Subject: [PATCH] correct typo added test for 'fetch_all_by_feature_class' with
 density features

---
 modules/t/analysis.t | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/modules/t/analysis.t b/modules/t/analysis.t
index f182a87970..ec15573d29 100644
--- a/modules/t/analysis.t
+++ b/modules/t/analysis.t
@@ -92,14 +92,15 @@ $analysis_updated = $analysis_ad->fetch_by_dbID($dbID);
 is($analysis_updated->description(), "updated description", "Description matches the update");
 is_rows(2, $db, "analysis_description");
 
-# Fetch all analyses for a feature class
-my @analyses = $analysis_ad->fetch_all_by_feature_class('Gene');
-is(scalar(@analyses), 1, "Found 1 analysis for genes");
-
+$multi->restore();
 
+# Fetch all analyses for a feature class
+my @analyses = @{ $analysis_ad->fetch_all_by_feature_class('Gene') };
+is(scalar(@analyses), 6, "Found 6 analyses for genes");
 
+@analyses = @{ $analysis_ad->fetch_all_by_feature_class('DensityFeature') };
+is(scalar(@analyses), 6, "Found 6 analyses for density features");
 
-$multi->restore();
 
 
 sub check_methods { 
-- 
GitLab