Support read_rds reading from URLs

Fixes #1186
tidyverse · May 6, 2021 · 744fdb4 · 744fdb4
1 parent 4d60e7c
commit 744fdb4
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 1 deletion.
diff --git a/NEWS.md b/NEWS.md
@@ -22,6 +22,8 @@
 
 ## Additional features and fixes
 
+* `read_rds()` can now read .Rds files from URLs (#1186)
+
 * `read_*()` functions gain a `show_col_types` argument, if set to `FALSE` this turns off showing the column types unconditionally.
 
 * readr now uses the clock package when parsing date-times (@DavisVaughan, r-lib/vroom#273)

diff --git a/R/rds.R b/R/rds.R
@@ -15,7 +15,10 @@
 #' write_rds(mtcars, "compressed_mtc.rds", "xz", compression = 9L)
 #' }
 read_rds <- function(file) {
-  readRDS(file)
+  con <- file(file)
+  on.exit(close(con))
+
+  readRDS(con)
 }