Merge pull request #177 from USEPA/pop_downscaling_kmn

Pop downscaling message fix
USEPA · Jul 9, 2024 · 21a43cb · 21a43cb
2 parents e11f820 + 2100653
commit 21a43cb
Showing 1 changed file with 2 additions and 1 deletion.
diff --git 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)