change verbose prefix (#42)

jmbarbone · Dec 23, 2023 · 234e08b · 234e08b
1 parent 36aab5b
commit 234e08b
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 2 deletions.
diff --git a/R/fuj-package.R b/R/fuj-package.R
@@ -18,7 +18,7 @@ NULL
 op.fuj <- list(
   fuj.verbose = NULL,
   fuj.verbose.fill = FALSE,
-  fuj.verbose.label = "<verboseMessage> "
+  fuj.verbose.label = "verbose: "
 )
 
 .onLoad <- function(libname, pkgname) {

diff --git a/tests/testthat/test-verbose.R b/tests/testthat/test-verbose.R
@@ -44,10 +44,17 @@ test_that("verbose.fill works", {
   op <- options(fuj.verbose.fill = TRUE, fuj.verbose = TRUE)
   on.exit(options(op))
 
+  regexp <- paste(
+    getOption("fuj.verbose.label"),
+    c("one", "two"),
+    sep = "",
+    collapse = "\n"
+  )
+
   expect_message(
     verbose("one\ntwo"),
     class = "verboseMessage",
-    regexp = "<verboseMessage> one\n<verboseMessage> two",
+    regexp = regexp,
     fixed = TRUE
   )
 })