diff --git a/R/data_modify.R b/R/data_modify.R
index 063ecc325..30b21e460 100644
--- a/R/data_modify.R
+++ b/R/data_modify.R
@@ -122,7 +122,7 @@
 #'   .at = c("Species", "new_length"),
 #'   .modify = as.numeric
 #' )}
-#' 
+#'
 #' # combine "data_find()" and ".at" argument
 #' out <- data_modify(
 #'   d,
diff --git a/tests/testthat/test-data_tabulate.R b/tests/testthat/test-data_tabulate.R
index 24c4a9a26..4390c1af5 100644
--- a/tests/testthat/test-data_tabulate.R
+++ b/tests/testthat/test-data_tabulate.R
@@ -51,7 +51,7 @@ test_that("data_tabulate, weights", {
   expect_equal(out[[1]]$N, out1$N, ignore_attr = TRUE)
   # mismatch of lengths
   w <- c(efc$weights, 1)
-  expect_error(data_tabulate(efc$e42dep, weights = w), regex = "Length of weights")
+  expect_error(data_tabulate(efc$e42dep, weights = w), regex = "Length of `weights`")
   # correct table footer
   expect_snapshot(print(data_tabulate(efc$e42dep, weights = efc$weights)))
   expect_snapshot(print_md(data_tabulate(efc$e42dep, weights = efc$weights)))