Commit f37d6c3d authored by Maurice Hendrix's avatar Maurice Hendrix
Browse files

added \n at the end of line, when not using log_object

parent 68ce552e
...@@ -151,7 +151,6 @@ sub check_CDS_start_end_remarks_loutre { ...@@ -151,7 +151,6 @@ sub check_CDS_start_end_remarks_loutre {
if ($attributes{'cds_end_NF'}) { if ($attributes{'cds_end_NF'}) {
if ($attributes{'cds_end_NF'}->[0]->value == 0 ) { if ($attributes{'cds_end_NF'}->[0]->value == 0 ) {
if (! grep {$_ eq $stop_codon} @stops) { if (! grep {$_ eq $stop_codon} @stops) {
# warn $trans->stable_id.": $coding_end--$trans_end--$stop_codon";
# warn $trans->translation->end_Exon->end_phase; # warn $trans->translation->end_Exon->end_phase;
$results->{'END_MISSING'}{'WRONG'} = $stop_codon; $results->{'END_MISSING'}{'WRONG'} = $stop_codon;
} }
...@@ -311,7 +310,7 @@ sub check_for_stops { ...@@ -311,7 +310,7 @@ sub check_for_stops {
my $att; my $att;
#get both hidden_remarks and remarks #get both hidden_remarks and remarks
foreach my $remark_type ('remark','hidden_remark') { foreach my $remark_type ('remark','hidden_remark') {
if(!$has_log_object){ if($has_log_object){
$att=$log_object->species_params->get_attributes->{$trans->stable_id}->{$remark_type}; $att=$log_object->species_params->get_attributes->{$trans->stable_id}->{$remark_type};
}else{ }else{
$att=$trans->get_all_Attributes($remark_type) $att=$trans->get_all_Attributes($remark_type)
...@@ -395,7 +394,7 @@ sub _save_log{ ...@@ -395,7 +394,7 @@ sub _save_log{
my $tsi=shift || ''; my $tsi=shift || '';
my $tag=shift || ''; my $tag=shift || '';
my $txt=shift || ''; my $txt=shift || '';
$self->$log_type($txt); $self->$log_type($txt."\n");
} }
#details of annotators comments #details of annotators comments
__DATA__ __DATA__
......
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