Support .tsv files (#155)

Fixes #153
wincowgerDEV · Oct 20, 2023 · 90e780c · 90e780c
1 parent 5675be0
commit 90e780c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/read_multi.R b/R/read_multi.R
@@ -33,7 +33,7 @@
 #'
 #' @export
 read_any <- function(file, ...) {
-  if (grepl("(\\.csv$)|(\\.txt$)", ignore.case = T, file)) {
+  if (grepl("(\\.csv$)|(\\.tsv$)|(\\.txt$)", ignore.case = T, file)) {
     os <- read_text(file = file, ...)
   } else if (grepl("\\.[0-999]$", ignore.case = T, file)) {
     os <- read_opus(file = file, ...)