diff --git a/R/read_docx.R b/R/read_docx.R index c8bb9a2b..f4df5dfa 100644 --- a/R/read_docx.R +++ b/R/read_docx.R @@ -144,7 +144,7 @@ print.rdocx <- function(x, target = NULL, ...){ names(style_sample) <- style_names$style_name print(style_sample) - if (length(read_docx()) > 1) { + if (length(x) > 1) { cursor_elt <- docx_current_block_xml(x) cat("\n* Content at cursor location:\n") print(node_content(cursor_elt, x))