We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent ca64859 commit 9028950Copy full SHA for 9028950
R/zzz.R
@@ -31,13 +31,7 @@ remove_old_cache_files <- function() {
31
32
remove_cache_old_versions <- function() {
33
dirs <- list.dirs(R.cache::getCachePath("styler"), recursive = FALSE)
34
- if (length(dirs) < 1) {
35
- return()
36
- }
37
old_package_dirs <- dirs[basename(dirs) != as.character(styler_version)]
38
- if (length(old_package_dirs) < 1) {
39
40
41
purrr::walk(old_package_dirs, function(dir) {
42
unlink(dir, recursive = TRUE, force = TRUE)
43
})
0 commit comments