Fix results file selection aborting if only a filtered file is present
This commit is contained in:
@@ -365,7 +365,8 @@ sub pick_data_file {
|
|||||||
# \Q...\E treats ... as literal string
|
# \Q...\E treats ... as literal string
|
||||||
my @files = sort grep { /^\Q$prefix\E.*\.csv$/ } find_files($dir);
|
my @files = sort grep { /^\Q$prefix\E.*\.csv$/ } find_files($dir);
|
||||||
|
|
||||||
return "$prefix.csv" unless @files > 1;
|
die "No $prefix CSV files found in $dir\n" unless @files;
|
||||||
|
return $files[0] if @files == 1;
|
||||||
|
|
||||||
# Make sure the unfiltered file is at the top
|
# Make sure the unfiltered file is at the top
|
||||||
my @sorted = sort {
|
my @sorted = sort {
|
||||||
|
|||||||
Reference in New Issue
Block a user