no partial matching

lorenzwalthert · lorenzwalthert · commit b1d4793b6741 · 2023-06-05T15:55:15.000+02:00
diff --git a/R/zzz.R b/R/zzz.R
@@ -76,7 +76,7 @@ remove_old_cache_files <- function() {
     path_version_specific,
     full.names = TRUE, recursive = TRUE
   )
-  date_boundary <- Sys.time() - as.difftime(6L, unit = "days")
+  date_boundary <- Sys.time() - as.difftime(6L, units = "days")
   file.remove(
     all_cached[file.info(all_cached)$mtime < date_boundary]
   )

Original file line number	Diff line number	Diff line change
`@@ -76,7 +76,7 @@ remove_old_cache_files <- function() {`
`76`	`76`	`path_version_specific,`
`77`	`77`	`full.names = TRUE, recursive = TRUE`
`78`	`78`	`)`
`79`		`- date_boundary <- Sys.time() - as.difftime(6L, unit = "days")`
	`79`	`+ date_boundary <- Sys.time() - as.difftime(6L, units = "days")`
`80`	`80`	`file.remove(`
`81`	`81`	`all_cached[file.info(all_cached)$mtime < date_boundary]`
`82`	`82`	`)`