avoid creating full records in class_outdated

ropensci · Dec 23, 2024 · 84788b7 · 84788b7
1 parent 9b1032e
commit 84788b7
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/R/class_outdated.R b/R/class_outdated.R
@@ -98,9 +98,10 @@ outdated_class <- R6::R6Class(
       counter_exists_name(self$outdated, name)
     },
     reset_hash = function(name) {
-      record <- self$meta$get_record(name)
-      record$data <- NA_character_
-      self$meta$set_record(record)
+      database <- .subset2(.subset2(self, "meta"), "database")
+      row <- database$get_row(name)
+      row$data <- NA_character_
+      database$set_row(row)
     },
     reset_junction = function(target) {
       if (!is.null(target$junction)) {