Remove read_table2()

Author: jennybc

NAMESPACE

@@ -100,7 +100,6 @@ export(read_lines_raw_chunked)
 export(read_log)
 export(read_rds)
 export(read_table)
-export(read_table2)
 export(read_tsv)
 export(read_tsv_chunked)
 export(readr_example)

NEWS.md

@@ -1,5 +1,9 @@
 # readr (development version)
 
+* `read_table2()` has been removed from readr. This function was deprecated in
+  readr 2.0.0 (2021-07-20) in favor of `read_table()`. Use `read_table()`
+  instead.
+
 * The `quote_escape` parameter has been removed from `write_delim()`,
   `write_csv()`, `write_csv2()`, `write_excel_csv()`, `write_excel_csv2()`,
   `write_tsv()`, `format_delim()`, `format_csv()`, `format_csv2()`, and

R/read_table.R

@@ -58,45 +58,6 @@ read_table <- function(
   )
 }
 
-#' Read whitespace-separated columns into a tibble
-#'
-#' @description
-#' `r lifecycle::badge("deprecated")`
-#'
-#' This function is deprecated because we renamed it to [read_table()] and
-#' removed the old `read_table` function, which was too strict for most cases
-#' and was analogous to just using `read_fwf()`.
-#' @keywords internal
-#' @export
-read_table2 <- function(
-  file,
-  col_names = TRUE,
-  col_types = NULL,
-  locale = default_locale(),
-  na = "NA",
-  skip = 0,
-  n_max = Inf,
-  guess_max = min(n_max, 1000),
-  progress = show_progress(),
-  comment = "",
-  skip_empty_rows = TRUE
-) {
-  lifecycle::deprecate_soft("2.0.0", "read_table2()", "read_table()")
-  read_table(
-    file = file,
-    col_names = col_names,
-    col_types = col_types,
-    locale = locale,
-    na = na,
-    skip = skip,
-    n_max = n_max,
-    guess_max = guess_max,
-    progress = progress,
-    comment = comment,
-    skip_empty_rows = skip_empty_rows
-  )
-}
-
 #' @rdname spec_delim
 #' @export
 spec_table <- generate_spec_fun(read_table)

man/read_table2.Rd

@@ -30,8 +30,6 @@ test_that("read_table can read a truncated file without crashing (740)", {
   )
 })
 
-# read_table2 -------------------------------------------------------------------
-
 test_that("read_table silently reads ragged columns", {
   x <- read_table("foo bar\n1 2\n3   4\n5     6\n")
   expect_equal(x$foo, c(1, 3, 5))