diff --git a/R/rename_ct_files.R b/R/rename_ct_files.R
index 5cf0f72..30abba7 100644
--- a/R/rename_ct_files.R
+++ b/R/rename_ct_files.R
@@ -19,11 +19,12 @@
 #'                                      destfile = tempfile(fileext = ".zip"),
 #'                                      email = Sys.getenv("email"),
 #'                                      update_always = TRUE)
+#'
+#' foldername <- paste0(tempdir(), "/test_rename_ct_files_unzipped")
 #' unzip(tempfile(fileext = ".zip"),
-#'       exdir = "./data/test_rename_ct_files_unzipped")
-#' foldername <- "./data/test_rename_ct_files_unzipped"
-#' rename_file_names(foldername)
-#' unlink("./data/test_rename_ct_files_unzipped",
+#'       exdir = foldername)
+#' #' rename_file_names(foldername)
+#' unlink(foldername,
 #'        recursive = TRUE)
 #'}
 #'
diff --git a/man/rename_ct_files.Rd b/man/rename_ct_files.Rd
index 5ed5278..c1797d3 100644
--- a/man/rename_ct_files.Rd
+++ b/man/rename_ct_files.Rd
@@ -27,11 +27,12 @@ fistools::download_gdrive_if_missing(gfileID = "1-84hbKouLKGwnLgBSRaQO1BnfogoFZW
                                      destfile = tempfile(fileext = ".zip"),
                                      email = Sys.getenv("email"),
                                      update_always = TRUE)
+
+foldername <- paste0(tempdir(), "/test_rename_ct_files_unzipped")
 unzip(tempfile(fileext = ".zip"),
-      exdir = "./data/test_rename_ct_files_unzipped")
-foldername <- "./data/test_rename_ct_files_unzipped"
-rename_file_names(foldername)
-unlink("./data/test_rename_ct_files_unzipped",
+      exdir = foldername)
+#' rename_file_names(foldername)
+unlink(foldername,
        recursive = TRUE)
 }