From 4d0e446391cfb7ef6d090c962eabf99cf20de777 Mon Sep 17 00:00:00 2001
From: LynnINBO <lynn.pallemaerts@inbo.be>
Date: Thu, 10 Oct 2024 14:14:30 +0200
Subject: [PATCH] Fix wrong function name

#84 #85
---
 R/rename_ct_files.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/rename_ct_files.R b/R/rename_ct_files.R
index ebc4c55..5684635 100644
--- a/R/rename_ct_files.R
+++ b/R/rename_ct_files.R
@@ -28,11 +28,11 @@
 #'}
 #' #'@export
 
-rename_file_names <- function(foldername,
                               extensions = c("jpg", "png", "jpeg", "bmp")) {
 
   require(dplyr)
   require(stringr)
+rename_ct_files <- function(foldername,
 
   # list all the files in the subfolders and prepare new file names
   images <- dir(foldername, recursive = TRUE,  full.names = FALSE) %>%