diff --git a/R/body_add_flextable.R b/R/body_add_flextable.R index 72e9c71d..70458204 100644 --- a/R/body_add_flextable.R +++ b/R/body_add_flextable.R @@ -29,6 +29,7 @@ body_add_flextable <- function( x, value, align = "center", pos = "after", split topcaption = TRUE) { stopifnot(inherits(x, "rdocx")) + stopifnot(inherits(value, "flextable")) if(topcaption && !is.null(value$caption$value)){ bc <- block_caption(label = value$caption$value,