Skip to content
Snippets Groups Projects
Commit 149c4862 authored by Andy Yates's avatar Andy Yates
Browse files

cleaned up directory name issue

parent 84db6ce1
No related branches found
No related tags found
No related merge requests found
...@@ -505,7 +505,7 @@ sub _generate_file_name { ...@@ -505,7 +505,7 @@ sub _generate_file_name {
my $file_name = join( '.', @name_bits ); my $file_name = join( '.', @name_bits );
$data_type =~ s/_rm$//; # remove repeatmask designation from path component $data_type =~ s/_[rs]m$//; # remove repeatmask or softmask designation from path component
my $data_type_dir = $self->fasta_path($data_type); my $data_type_dir = $self->fasta_path($data_type);
$self->_remove_files_from_dir($data_type_dir); $self->_remove_files_from_dir($data_type_dir);
return File::Spec->catfile( $data_type_dir, $file_name ); return File::Spec->catfile( $data_type_dir, $file_name );
......
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