fix assert() fxn to use !inherits() instead of x in y

ropensci · Oct 10, 2019 · 060bc6e · 060bc6e
1 parent bef0702
commit 060bc6e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/zzz.R b/R/zzz.R
@@ -174,7 +174,7 @@ rvc <- function(x) Filter(Negate(is.null), x)
 
 assert <- function(x, y) {
   if (!is.null(x)) {
-    if (!class(x) %in% y) {
+    if (!inherits(x, y)) {
       stop(deparse(substitute(x)), " must be of class ",
            paste0(y, collapse = ", "), call. = FALSE)
     }