1
0
mirror of https://github.com/msberends/AMR.git synced 2025-07-08 20:02:04 +02:00

(v1.6.0.9005) unit test fix

This commit is contained in:
2021-04-16 13:24:59 +02:00
parent 9842ef9660
commit 24ac18a99d
13 changed files with 15 additions and 15 deletions

View File

@ -222,7 +222,7 @@ is_valid_regex <- function(x) {
error = function(e) rep(TRUE, length(x)))
regex_valid <- vapply(FUN.VALUE = logical(1),
X = x,
FUN = function(y) !"try-error" %in% class(try(grepl(y, ""),
FUN = function(y) !"try-error" %in% class(try(grepl(y, "", perl = TRUE),
silent = TRUE)),
USE.NAMES = FALSE)
regex_at_all & regex_valid