diff --git a/r/NAMESPACE b/r/NAMESPACE index cdeb27c4067..9dbbad9c45c 100644 --- a/r/NAMESPACE +++ b/r/NAMESPACE @@ -26,7 +26,7 @@ S3method(Math,ArrowDatum) S3method(Ops,ArrowDatum) S3method(Ops,Expression) S3method(all,ArrowDatum) -S3method(all,equal.ArrowObject) +S3method(all.equal,ArrowObject) S3method(any,ArrowDatum) S3method(as.character,ArrowDatum) S3method(as.character,FileFormat) diff --git a/r/R/arrow-object.R b/r/R/arrow-object.R index 2f970c87edb..c9cd0b98c7a 100644 --- a/r/R/arrow-object.R +++ b/r/R/arrow-object.R @@ -73,6 +73,7 @@ ArrowObject <- R6Class( x$Equals(y) } +#' @method all.equal ArrowObject #' @export all.equal.ArrowObject <- function(target, current, ..., check.attributes = TRUE) { target$Equals(current, check_metadata = check.attributes)