don't error in reseolve_vars

tidyverse · Nov 6, 2015 · ab83787 · ab83787
1 parent c6701c6
commit ab83787
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/dplyr.cpp b/src/dplyr.cpp
@@ -1439,7 +1439,7 @@ SEXP resolve_vars( List new_groups, CharacterVector names){
     } else if( TYPEOF(s) == LANGSXP && CAR(s) == Rf_install("column") && Rf_length(s) == 2 ){
       s = extract_column( CADR(s), env ) ;
     } else {
-      stop("unsupported value in group_by") ;
+      continue ;
     }
     // check that s is indeed in the data