actually export the function

Author: jiajic

NAMESPACE

@@ -86,6 +86,7 @@ export(str_double_quote)
 export(str_locate2)
 export(str_parenth)
 export(str_quote)
+export(str_reformat)
 export(str_vector)
 export(suite_install)
 export(suite_packages)

R/format.R

@@ -365,6 +365,7 @@ str_quote <- function(x) {
 #' txt <- "hello
 #'         world"
 #' cat(str_reformat(cat(txt), indent = 3))
+#' @export
 str_reformat <- function(x, ...) {
     cap <- capture.output(x)
     paste(strwrap(cap, ...), collapse = "\n")