fix a bug

ropensci · Nov 7, 2024 · f379c5c · f379c5c
1 parent 632f6bc
commit f379c5c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/class_store_repository_cas.R b/R/class_store_repository_cas.R
@@ -70,7 +70,7 @@ store_read_object.tar_repository_cas <- function(store, file) {
 #' @export
 store_has_correct_hash.tar_repository_cas <- function(store, file) {
   lookup <- tar_repository_cas_lookup(store)
-  key <- .subset2(.subset2(store, "file"), "hash")
+  key <- .subset2(file, "hash")
   if (lookup_missing(lookup = lookup, name = key)) {
     value <- store_repository_cas_call_method(
       store = store,