Skip to content
Snippets Groups Projects
Commit e0a3a53b authored by Alistair Rust's avatar Alistair Rust
Browse files

Getter/setter for relevant_xref_id.

parent 66e8009b
No related branches found
No related tags found
No related merge requests found
......@@ -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
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment