Pass trim_ws from read_xls[x]() into read_excel_()

Fixes #514
tidyverse · Oct 30, 2018 · e2b8f70 · e2b8f70
1 parent db6c297
commit e2b8f70
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 2 deletions.
diff --git a/NEWS.md b/NEWS.md
@@ -1,5 +1,7 @@
 # readxl *development version*
 
+* `read_xls()` and `read_xlsx()` pass the `trim_ws` argument along (#514).
+
 * readxl has a new article on reading Excel files with multiple header rows (#486, #492  @apreshill).
 
 ## Breaking change

diff --git a/R/read_excel.R b/R/read_excel.R
@@ -110,7 +110,8 @@ read_xls <- function(path, sheet = NULL, range = NULL,
   read_excel_(
     path = path, sheet = sheet, range = range,
     col_names = col_names, col_types = col_types,
-    na = na, skip = skip, n_max = n_max, guess_max = guess_max,
+    na = na, trim_ws = trim_ws, skip = skip,
+    n_max = n_max, guess_max = guess_max,
     format = "xls"
   )
 }
@@ -125,7 +126,8 @@ read_xlsx <- function(path, sheet = NULL, range = NULL,
   read_excel_(
     path = path, sheet = sheet, range = range,
     col_names = col_names, col_types = col_types,
-    na = na, skip = skip, n_max = n_max, guess_max = guess_max,
+    na = na, trim_ws = trim_ws, skip = skip,
+    n_max = n_max, guess_max = guess_max,
     format = "xlsx"
   )
 }