Commit 3b363ab2 authored by Ian Longden's avatar Ian Longden
Browse files

set ignore correctly dependong on the mode

parent baab5fc7
......@@ -13,9 +13,12 @@ sub get_set_lists {
}
sub transcript_display_xref_sources {
my $self = shift;
my $fullmode = shift;
my @list = qw(RFAM
my @list = qw(RFAM
miRBase
RGD
MGI
......@@ -29,13 +32,19 @@ my @list = qw(RFAM
my %ignore;
$ignore{"EntrezGene"}= 'FROM:RefSeq_[pd][en][pa].*_predicted';
if(!$fullmode){
$ignore{"EntrezGene"}= 'FROM:RefSeq_[pd][en][pa].*_predicted';
}
else{
$ignore{"EntrezGene"} = 'select ox.object_xref_id from object_xref ox, dependent_xref dx, source s1, xref x1, source s2, xref x2 where ox.object_xref_id = dx.object_xref_id and dx.dependent_xref_id = x1.xref_id and x1.source_id = s1.source_id and s1.name = "EntrezGene" and x2.xref_id = dx.master_xref_id and x2.source_id = s2.source_id and (s2.name like "Refseq_dna_predicted" or s2.name like "RefSeq_peptide_predicted") and ox.ox_status = "DUMP_OUT"';
}
return [\@list,\%ignore];
}
sub gene_description_filter_regexps {
return ('^\(CLONE REM\d+\) ORF \(FRAGMENT\)\.*',
......
Markdown is supported
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