Support dev tibble

Which throws error when subsetting with NULL
tidyverse · Jun 17, 2016 · 3a3249e · 3a3249e
1 parent 45c5f45
commit 3a3249e
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/NEWS.md b/NEWS.md
@@ -1,5 +1,7 @@
 # purrr 0.2.1.9000
 
+* Fix for dev tibble support.
+
 * `as_function()` now supports list arguments which allow recursive indexing
    using either names or positions. They now always stop when encountering
    the first NULL (#173).

diff --git a/R/rows.R b/R/rows.R
@@ -100,7 +100,7 @@ set_sliced_env <- function(df, labels, collate, to, env, x_name) {
   env$.collate <- collate
   env$.to <- to
   env$.labels_cols <- attr(df, "labels")
-  env$.slicing_cols <- df[names(env$.labels_cols)]
+  env$.slicing_cols <- df[names(env$.labels_cols) %||% character(0)]
 
   indices <- attr(df, "indices")
   env[[x_name]] <- df[!names(df) %in% names(env$.labels_cols)]