Merge pull request #81 from ChemiKyle/fix_regex_replacement

Fix regex replacement
ctsit · Sep 14, 2022 · c8d629f · c8d629f
2 parents 0456efa + 76bfc6d
commit c8d629f
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/R/dataset_diff.R b/R/dataset_diff.R
@@ -48,7 +48,7 @@ dataset_diff <- function(source,
     dplyr::anti_join(target) %>%
     dplyr::inner_join(target, by=source_pk) %>%
     dplyr::select(dplyr::any_of(target_pk), dplyr::any_of(names(source)), dplyr::ends_with(".x")) %>%
-    dplyr::rename_with(., ~ gsub(".x", "", .x), dplyr::ends_with(".x"))
+    dplyr::rename_with(., ~ gsub("\\.x", "", .x), dplyr::ends_with(".x"))
 
   ids_of_update_records <- update_records %>% dplyr::pull({{target_pk}})
 

diff --git a/R/write_data.R b/R/write_data.R
@@ -228,7 +228,7 @@ sync_table_2 <- function(
     dplyr::anti_join(target) %>%
     dplyr::inner_join(target, by=source_pk) %>%
     dplyr::select(dplyr::any_of(target_pk), dplyr::any_of(names(source)), dplyr::ends_with(".x")) %>%
-    dplyr::rename_with(., ~ gsub(".x", "", .x), dplyr::ends_with(".x"))
+    dplyr::rename_with(., ~ gsub("\\.x", "", .x), dplyr::ends_with(".x"))
 
   ids_of_update_records <- update_records %>% dplyr::pull({{target_pk}})