diff --git a/FrEDI/R/utils_import_inputs.R b/FrEDI/R/utils_import_inputs.R index ee19b7cf..697f9727 100644 --- a/FrEDI/R/utils_import_inputs.R +++ b/FrEDI/R/utils_import_inputs.R @@ -432,7 +432,8 @@ check_valCols <- function( return() } ### End if(nMatches) ### Message user - msg_vcol2 <- paste0("Using column ", "\"", vColMatch, "\"", ", and renaming to ", "\"", valCol, "\"", "...") + renameVal <- doPop |> ifelse("state_", "") |> paste0(valCol) + msg_vcol2 <- paste0("Using column ", "\"", vColMatch, "\"", ", and renaming to ", "\"", renameVal, "\"", "...") msg1_i |> paste0(msg_vcol2) |> message() } ### End if(hasValCol) (no else)