diff --git a/modules/Bio/EnsEMBL/Transcript.pm b/modules/Bio/EnsEMBL/Transcript.pm index 05a4aba9a7515e33a37f9523a4a31277d67f4bf5..2f1e3c57fb560f22885179f0b210789db5e97488 100755 --- a/modules/Bio/EnsEMBL/Transcript.pm +++ b/modules/Bio/EnsEMBL/Transcript.pm @@ -238,6 +238,38 @@ sub adaptor { } + +=head2 relevant_xref + + Arg [1] : int $relevant_xref_id + Example : $transcript->relevant_xref(42); + Description: get/set/lazy_loaded relevant_xref_id for this transcript + Returntype : int + Exceptions : none + Caller : general + +=cut + +sub relevant_xref{ + + my ($self,$value) = @_; + + if( defined $value ) { + $self->{'relevant_xref'} = $value; + return; + } + + if( exists $self->{'relevant_xref'} ) { + return $self->{'relevant_xref'}; + } + + $self->{'relevant_xref'} = $self->adaptor->get_relevant_xref_id($self->dbID); + + return $self->{'relevant_xref'}; +} + + + =head2 _translation_id Title : _translation_id