From 38d66dd69d2c0a10de3b6ca2b8586dd6b3efe5af Mon Sep 17 00:00:00 2001
From: Arne Stabenau <stabenau@sanger.ac.uk>
Date: Thu, 9 Jan 2003 11:26:26 +0000
Subject: [PATCH] tests for modified PredictionTranscript behaviour
---
modules/t/MultiTestDB.conf | 2 +-
modules/t/predictionTranscript.t | 4 ++--
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/modules/t/MultiTestDB.conf b/modules/t/MultiTestDB.conf
index f919e7ce44..d50120664b 100644
--- a/modules/t/MultiTestDB.conf
+++ b/modules/t/MultiTestDB.conf
@@ -7,7 +7,7 @@
'zip' => 'test_genome.zip',
#add a line with the dbname and module
- 'databases' => { 'core' => 'Bio::EnsEMBL::DBSQL::DBAdaptor'}
+ 'databases' => { 'core' => 'Bio::EnsEMBL::DBSQL::DBAdaptor'}
}
diff --git a/modules/t/predictionTranscript.t b/modules/t/predictionTranscript.t
index bc0275be55..54fe3b8a08 100644
--- a/modules/t/predictionTranscript.t
+++ b/modules/t/predictionTranscript.t
@@ -109,7 +109,7 @@ $pt->add_Exon($exon);
#check that transcript start + end updated
ok($pt->start == $exon->start);
ok($pt->end == $exon->end);
-$exons = $pt->get_all_Exons;
+$exons = $pt->get_all_Exons( 1 );
#check that there is one more exon
ok($count + 1 == scalar(@$exons));
#check that the last exon is the exon added
@@ -158,7 +158,7 @@ ok($pt->get_exon_count == scalar @{$pt->get_all_Exons});
#
$count = $pt->get_exon_count;
$pt->set_exon_count(26);
-ok(scalar @{$pt->get_all_Exons} == 26); # test internal exon array expansion
+ok(scalar @{$pt->get_all_Exons( 1 )} == 26); # test internal exon array expansion
$pt->set_exon_count($count);
#
--
GitLab