From 32cb1138b6cb090bbaa84c5a64e8fe7dae885d20 Mon Sep 17 00:00:00 2001
From: Alistair Rust <rust@sanger.ac.uk>
Date: Wed, 18 Dec 2002 08:22:54 +0000
Subject: [PATCH] Updated tests for relevant_xref_id stuff.

---
 modules/t/transcript.t | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/modules/t/transcript.t b/modules/t/transcript.t
index b9b2753917..77b03c6fb3 100644
--- a/modules/t/transcript.t
+++ b/modules/t/transcript.t
@@ -5,7 +5,7 @@ use vars qw( $verbose );
 
 BEGIN { $| = 1;  
 	use Test;
-	plan tests => 26;
+	plan tests => 28;
 }
 
 use MultiTestDB;
@@ -80,6 +80,9 @@ ok ( $tr->external_name eq "MAPRE1");
 debug ( "External transcript dbname: " . $tr->external_db );
 ok ( $tr->external_db eq 'HUGO' );
 
+debug ( "Relevant_xref_id: " . $tr->relevant_xref );
+ok ( $tr->relevant_xref == 97759 );
+ok( test_getter_setter( $tr, "relevant_xref", 42 ));
 
 ok( test_getter_setter( $tr, "dbID", 100000 ));
 ok( test_getter_setter( $tr, "type", "NOVEL" ));
-- 
GitLab