fix .D naming bug again

ethanbass · Jun 1, 2023 · 4166c26 · 4166c26
1 parent 27f56a4
commit 4166c26
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/read_chroms.R b/R/read_chroms.R
@@ -269,7 +269,7 @@ read_chroms <- function(paths, find_files,
     }
     }
   }
-  if (all(grepl(".d$", files, ignore.case = TRUE))){
+  if (all(grepl("\\.[Dd]$|\\.[Dd]?[/\\\\]",files))){
     file_names <- strsplit(files, "/")
     file_names <- gsub("\\.[Dd]", "",
                        sapply(file_names, function(n){