mirror of
https://github.com/johrpan/geposan.git
synced 2025-10-26 10:47:25 +01:00
Use inherits() for class checking
This commit is contained in:
parent
207fc753a7
commit
d98c70a205
4 changed files with 6 additions and 6 deletions
|
|
@ -12,7 +12,7 @@
|
|||
#'
|
||||
#' @export
|
||||
validate <- function(analysis, progress = NULL) {
|
||||
if (class(analysis) != "geposan_analysis") {
|
||||
if (inherits(analysis, "geposan_analysis")) {
|
||||
stop("Analysis is invalid. Use geposan::analyze().")
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue