From a5230e0ef6a99e0bbacce8527e3c5b73dcd5df32 Mon Sep 17 00:00:00 2001
From: Andrew Yates <ayates@ebi.ac.uk>
Date: Fri, 8 Jun 2012 11:12:39 +0000
Subject: [PATCH] Better test case which reports what has gone wrong

---
 modules/t/slice.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/modules/t/slice.t b/modules/t/slice.t
index 71ac23fb7e..889267102a 100644
--- a/modules/t/slice.t
+++ b/modules/t/slice.t
@@ -249,7 +249,7 @@ $count += scalar @$dafs;
 # Test Slice::get_all_ProteinAlignFeatures
 #
 my $pafs = $slice->get_all_ProteinAlignFeatures;
-ok(@$pafs == 7205);
+is(scalar(@$pafs),7205, 'Checking count of returned ProteinAlignFeatures');
 $count += scalar @$pafs;
 
 #
-- 
GitLab