Use teal.data::get_code instead of teal.data:::get_code_dependency

R/get_rcode_utils.R

@@ -47,7 +47,7 @@ get_rcode_str_install <- function() {
 get_datasets_code <- function(datanames, datasets, hashes) {
   # preprocessing code
   str_prepro <-
-    teal.data:::get_code_dependency(attr(datasets, "preprocessing_code"), names = datanames, check_names = FALSE)
+    teal.data::get_code(attr(datasets, "preprocessing_code"), datanames = datanames, check_names = FALSE)
   if (length(str_prepro) == 0) {
     str_prepro <- "message('Preprocessing is empty')"
   } else {