eke out more tar_outdated() gains

ropensci · Jan 3, 2025 · 4be227a · 4be227a
1 parent b76fbd1
commit 4be227a
Showing 1 changed file with 4 additions and 5 deletions.
diff --git a/R/class_meta.R b/R/class_meta.R
@@ -74,12 +74,11 @@ meta_class <- R6::R6Class(
       remove <- setdiff(names_records, names_current)
       self$del_records(remove)
     },
-    hash_dep = function(name) {
-      .subset2(.subset2(lookup, name), "data")
-    },
     hash_deps = function(deps, pipeline) {
-      hashes <- lapply(X = deps, FUN = hash_dep)
-      names(hashes) <- deps
+      hashes <- list()
+      for (name in deps) {
+        hashes[[name]] <- .subset2(.subset2(lookup, name), "data")
+      }
       hashes <- unlist(hashes, use.names = TRUE)
       string <- paste(c(names(hashes), hashes), collapse = "")
       hash_object(string)