feat: remove repeated $

atorus-research · Feb 29, 2024 · 91dfcd4 · 91dfcd4
1 parent 596d95c
commit 91dfcd4
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/format.R b/R/format.R
@@ -180,7 +180,7 @@ check_formats <- function(.df, format, verbose) {
 
  # check that any variables ending DT, DTM, TM have a format
  if (identical(format_sas, "")) {
- if (isTRUE(grepl("DT$|DTM$|TM$", colnames(.df)[i]))) {
+ if (isTRUE(grepl("(DT|DTM|TM)$", colnames(.df)[i]))) {
  message <- glue(
  "(xportr::xportr_format) {encode_vars(colnames(.df)[i])} is expected to have a format but does not."
  )