1
0
mirror of https://github.com/msberends/AMR.git synced 2025-07-08 09:51:48 +02:00

(v1.4.0.9016) as.rsi() older R versions

This commit is contained in:
2020-11-10 19:59:14 +01:00
parent 15c732703d
commit 68ac39aa7f
14 changed files with 28 additions and 17 deletions

View File

@ -313,7 +313,9 @@ word_wrap <- function(...,
}
msg <- gsub("\n", paste0("\n", strrep(" ", indentation)), msg, fixed = TRUE)
msg <- gsub("*|*", paste0("*|*", strrep(" ", indentation)), msg, fixed = TRUE)
# remove trailing empty characters
msg <- gsub("(\n| )+$", "", msg)
if (length(add_fn) > 0) {
if (!is.list(add_fn)) {
add_fn <- list(add_fn)