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

[ENSCORESW-488]. Bug introduced by critic cleanup. Fixed

parent 8fa64933
No related branches found
No related tags found
No related merge requests found
......@@ -126,7 +126,8 @@ sub open_file{
throw("Cannot perform open with unsupported operator:\t${file_op}${filepath}");
}
my $success = open my $fh, $file_op, $filepath;
my $fh;
my $success = open $fh, $file_op, $filepath;
#$fh will be still be GLOB on fail
#These warn instead of throw/die to allow
......
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