From 5c8bb3fe3ca53783b99d69855f698fffc52076be Mon Sep 17 00:00:00 2001
From: Jeffrey Wong <jeffreyw@netflix.com>
Date: Wed, 9 Jan 2019 23:06:00 -0800
Subject: [PATCH] fix R parquet

---
 r/R/parquet.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/r/R/parquet.R b/r/R/parquet.R
index 6a393e2c880..64dc1cd7aad 100644
--- a/r/R/parquet.R
+++ b/r/R/parquet.R
@@ -26,7 +26,7 @@
 #'
 #' @export
 read_parquet <- function(file, as_tibble = TRUE, use_threads = TRUE, ...) {
-  tab <- shared_ptr(`arrow::Table`, read_parquet_file(f))
+  tab <- shared_ptr(`arrow::Table`, read_parquet_file(file))
   if (isTRUE(as_tibble)) {
     tab <- as_tibble(tab, use_threads = use_threads)
   }