diff --git a/R/validate_model_data.R b/R/validate_model_data.R index 6f40425..e34d57b 100644 --- a/R/validate_model_data.R +++ b/R/validate_model_data.R @@ -31,7 +31,7 @@ validate_model_data <- function(data_file, data_schema) { validations <- c(validations, fhub_check( data_file, grepl( - "^\\d{4}\\-\\d{2}\\-\\d{2}-[a-zA-Z0-9_]+-[a-zA-Z0-9_]+(-[A-Z]{2})?(-[[:alpha:]]+)?\\.csv(\\.gz)?$", + "^\\d{4}\\-\\d{2}\\-\\d{2}-[a-zA-Z0-9_]+-[a-zA-Z0-9_]+(-[A-Z]{2})?(-[[:alpha:][:blank:]]+)?\\.csv(\\.gz)?$", fs::path_file(data_file) ), "Filename", "formed of a date, a model name, and optionally a country and/or target separated by an hyphen"