diff --git a/R/estimate_contrasts.R b/R/estimate_contrasts.R index 39eff4ab..90619408 100644 --- a/R/estimate_contrasts.R +++ b/R/estimate_contrasts.R @@ -95,7 +95,7 @@ estimate_contrasts <- function(model, fixed = fixed, transform = transform, method = method, - adjust = adjust, + adjust = p_adjust, ... ) diff --git a/R/estimate_means.R b/R/estimate_means.R index ee1959aa..fececfc1 100644 --- a/R/estimate_means.R +++ b/R/estimate_means.R @@ -177,7 +177,7 @@ estimate_means <- function(model, if (p_adjust == "none") { table_footer <- paste0(table_footer, "\np-values are uncorrected.") } else { - table_footer <- paste0(table_footer, "\np-value adjustment method: ", parameters::format_p_adjust(adjust)) + table_footer <- paste0(table_footer, "\np-value adjustment method: ", parameters::format_p_adjust(p_adjust)) } }