From ccba4601ee43622b1c13dcf3f343b74026d25aad Mon Sep 17 00:00:00 2001
From: Dominique Makowski <dom.mak19@gmail.com>
Date: Wed, 5 Oct 2022 17:19:06 +0800
Subject: [PATCH] oops - hotfix

---
 R/estimate_contrasts.R | 2 +-
 R/estimate_means.R     | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

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))
     }
   }