From 96df952ad09a2ce39aec1d6214f798742a5d5604 Mon Sep 17 00:00:00 2001 From: Daniel Date: Fri, 13 Sep 2024 15:09:37 +0200 Subject: [PATCH] fix --- R/check_dag.R | 6 ++++-- tests/testthat/_snaps/check_dag.md | 3 ++- 2 files changed, 6 insertions(+), 3 deletions(-) diff --git a/R/check_dag.R b/R/check_dag.R index 932001aea..e7dd47daa 100644 --- a/R/check_dag.R +++ b/R/check_dag.R @@ -447,6 +447,7 @@ print.check_dag <- function(x, ...) { ), "." ) + current_str <- "\nCurrently" } else { msg <- paste0( msg, @@ -456,12 +457,13 @@ print.check_dag <- function(x, ...) { ), "yellow"), "." ) + current_str <- " Currently" } if (is.null(out$current_adjustments)) { - msg <- paste0(msg, " Currently, the model does not adjust for any variables.") + msg <- paste0(msg, current_str, ", the model does not adjust for any variables.") } else { msg <- paste0( - msg, " Currently, the model only adjusts for ", + msg, current_str, ", the model only adjusts for ", datawizard::text_concatenate(out$current_adjustments, enclose = "`"), "." ) diff --git a/tests/testthat/_snaps/check_dag.md b/tests/testthat/_snaps/check_dag.md index c2d95069f..eff5ed7d1 100644 --- a/tests/testthat/_snaps/check_dag.md +++ b/tests/testthat/_snaps/check_dag.md @@ -108,7 +108,8 @@ - alertness, prepared - alertness, skills_course - mood, prepared - - mood, skills_course. Currently, the model does not adjust for any variables. + - mood, skills_course. + Currently, the model does not adjust for any variables. ---