Skip to content
Snippets Groups Projects
Commit ad3ae9e9 authored by Simon Brent's avatar Simon Brent
Browse files

merging changes from branch-ensembl-64

parent b5154643
No related branches found
No related tags found
No related merge requests found
......@@ -165,23 +165,23 @@ sub parse_common_options {
# if logpath & logfile are not set, set them here to /ensemblweb/vega_dev/shared/logs/conversion/DBNAME/SCRIPNAME_NN.log
if (defined($self->param('log_base_path'))) {
my $dbname = $self->param('dbname');
$dbname =~ s/^vega_//;
if (not (defined($self->param('logpath')))){
$self->param('logpath', $self->param('log_base_path')."/".$dbname."/" );
}
if ( (not defined $self->param('logfile') ) && (not defined $self->param('nolog') ) ){
my $log = $Script;
$log =~ s/.pl$//g;
my $counter;
for ($counter=1 ; (-e $self->param('logpath')."/".$log."_".sprintf("%03d", $counter).".log"); $counter++){
if (! defined($self->param('log_base_path'))) {
$self->param('log_base_path','/ensemblweb/shared/logs/conversion/');
}
my $dbname = $self->param('dbname');
$dbname =~ s/^vega_//;
if (not (defined($self->param('logpath')))){
$self->param('logpath', $self->param('log_base_path')."/".$dbname."/" );
}
if ( (not defined $self->param('logfile') ) && (not defined $self->param('nolog') ) ){
my $log = $Script;
$log =~ s/.pl$//g;
my $counter;
for ($counter=1 ; (-e $self->param('logpath')."/".$log."_".sprintf("%03d", $counter).".log"); $counter++){
# warn $self->param('logpath')."/".$log."_".$counter.".log";
}
$self->param('logfile', $log."_".sprintf("%03d", $counter).".log");
}
$self->param('logfile', $log."_".sprintf("%03d", $counter).".log");
}
return(1);
}
......
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