normalize path when cache is memory in load_race_session()

SCasanova · Aug 16, 2023 · 8461eac · 8461eac
1 parent 562cff5
commit 8461eac
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/load_race_session.R b/R/load_race_session.R
@@ -59,7 +59,7 @@ load_race_session <- function(obj_name = "session", season = get_current_season(
 
   # only cache to tempdir if cache option is set to memory or off (includes filesystem in vector as a fallback error catch)
   if (getOption("f1dataR.cache") %in% c("memory", "off", "filesystem")) {
-    f1datar_cache <- tempdir()
+    f1datar_cache <- normalizePath(tempdir(), winslash = "/")
   } else {
     f1datar_cache <- normalizePath(getOption("f1dataR.cache"), winslash = "/")
   }