restore old code

ropensci · Dec 23, 2024 · ef4fa85 · ef4fa85
1 parent 897270d
commit ef4fa85
Showing 1 changed file with 10 additions and 3 deletions.
diff --git a/R/class_meta.R b/R/class_meta.R
@@ -72,16 +72,23 @@ meta_class <- R6::R6Class(
       self$del_records(remove)
     },
     hash_dep = function(name, pipeline) {
-      .subset2(.subset2(.subset2(self, "database"), "get_row")(name), "data")
+      exists <- self$exists_record(name) &&
+        pipeline_exists_object(pipeline, name)
+      if_any(
+        exists,
+        self$get_record(name)$data,
+        ""
+      )
     },
     hash_deps = function(deps, pipeline) {
 
       browser()
 
       hashes <- lapply(
         X = sort_chr(deps),
-        FUN = self$hash_dep,
-        pipeline = pipeline
+        FUN = function(name) {
+          .subset2(.subset2(.subset2(self, "database"), "get_row")(name), "data")
+        },
       )
       names(hashes) <- deps
       hashes <- unlist(hashes, use.names = TRUE)